Kopírování a vkládání proměnlivých dat - excel

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

bloom
nováček
Příspěvky: 11
Registrován: březen 14
Pohlaví: Muž
Stav:
Offline

Kopírování a vkládání proměnlivých dat - excel

Příspěvekod bloom » 14 dub 2014 12:39

Ahoj, potřeboval bych vytvořit makro, které by kopírovalo vyfiltrovaná data do jiné tabulky. Problém je v tom, že se jedná o proměnlivá data a každý měsíc se jich vyfiltruje jiný počet. Potřeboval bych, aby makro kopírovalo proměnlivý počet dat v daném měsíci a kopírovaná data vložilo doprostřed jiné tabulky, ve které se přidá příslušný počet prádzných řádků odpovídající počtu kopírovaných dat. S filtrem nemám problém, jen s tím speciálním kopírováním a (především) vkládáním. Doufám, že jsem zadání vysvětlil jasně. :) Mnohokrát děkuji za jakoukoliv pomoc. Bloom

Reklama
Azuzula
Level 3
Level 3
Příspěvky: 452
Registrován: leden 12
Bydliště: Země, bohužel...
Pohlaví: Žena
Stav:
Offline
Kontakt:

Re: Kopírování a vkládání proměnlivých dat - excel

Příspěvekod Azuzula » 17 dub 2014 13:04

Ahoj, hodil by se nějaký příklad jak si to představuješ (co, kam a jak kopírovat) ať je na čem stavět, takhle z ničeho ti těžko někdo napíše makro.
Pak se toho už může někdo chytit.
Pokud je to vše.
Vše co znám z VBA jsem se naučila tady na fóru, na Office.lasakovi, david-zbiral.cz a hlavně hledáním na googlu.
SZ není poradna, na pokládání dotazů je tu fórum. Děkuji.

cmuch
Level 4.5
Level 4.5
Příspěvky: 1547
Registrován: březen 11
Bydliště: Drsná Vysočina :D
Pohlaví: Muž
Stav:
Offline

Re: Kopírování a vkládání proměnlivých dat - excel

Příspěvekod cmuch » 18 dub 2014 20:25

Tady je kousek makra jak kopírovat vyfiltrovaná data jinam.

Kód: Vybrat vše

Dim My_range As Range

Set My_range = Sheets(1).Range("A1:D100")

My_range.Parent.AutoFilter.Range.Copy

Sheets(2).Range("A1").PasteSpecial xlPasteValues

Application.CutCopyMode = False

nebo

Kód: Vybrat vše

List1.Range("A1:D500").SpecialCells(xlCellTypeVisible).Copy Destination:=List2.Range("A1")


Stačí nastavit oblast tabulky a kam se má kopírovat.


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • EXCEL -jak otevřít 2 excel sobory abych je viděla současne a samostatně
    od Ketty02 » 30 srp 2024 21:19 » v Vše ostatní (sw)
    2
    4827
    od Riviera kid Zobrazit poslední příspěvek
    02 zář 2024 16:21
  • ComboBox v Excelu kopírování Příloha(y)
    od LukM » 19 říj 2024 14:03 » v Kancelářské balíky
    0
    2667
    od LukM Zobrazit poslední příspěvek
    19 říj 2024 14:03
  • Přechod z Excel 21 na Excel 24
    od Snekment » 29 led 2025 13:46 » v Kancelářské balíky
    2
    12247
    od Snekment Zobrazit poslední příspěvek
    29 led 2025 15:05
  • Pohoda a excel Příloha(y)
    od brownwld » 06 kvě 2025 17:28 » v Kancelářské balíky
    1
    4826
    od atari Zobrazit poslední příspěvek
    07 kvě 2025 09:41
  • Excel - výpočet nočních hodin Příloha(y)
    od Uziv00 » 17 říj 2024 11:22 » v Kancelářské balíky
    3
    3363
    od lubo. Zobrazit poslední příspěvek
    24 říj 2024 00:00

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 0 hostů