< návrat zpět

MS Excel


Téma: Import dat z různých sešitů pomocí VBA rss

Zaslal/a 15.8.2017 10:56

Zdravím Vás a prosím o pomoc. Potřeboval makro které by mi do jednoho sešitu naimportovalo data z vícero různých sešitů. V sešitu Import dat je na listu souhrn sloupec s čísly, a tato čísla jsou názvy sešitů a z těchto sešitů bych potřeboval dostat data do sešitu Import dat.
V importovaných sešitech bude vždy na listu1 na stejnem míste tabulka s daty a tyto data bych potřeboval dostat do spravných buněk v sešitu import dat na list souhrn do již předem vytvořených buněk. V příloze jsem do listu souhrn ručne nakopíroval data ze sešitu 3154 aby bylo zřejmé která data kam mají přijít.

Již jsem si hrál s jedním makrem, které jsem našel na webu (na listu pokus)
ale bohužel se mi nepovedlo nastavit to aby importoval data jen z určitých sešitů (nyní bere všechny co jsou v dané složce) a ve správném pořadí (nyní kopíruje z jednoho sešitu všechny řádky na jeden a další sešit na další řádek)

Pro jistotu jsem do přílohy udělal schema toho co bych potřeboval aby makro umělo.

Všem předem děkuji za pomoc.

Zaslat odpověď >

#037266
avatar
Příloha zde není ;-)...
P.citovat
#037268
avatar
Omlouvám se asi velký soubor
Příloha: zip37268_import.zip (318kB, staženo 76x)
citovat
#037298
avatar
Zdravím, nebyl by schopen někdo s tim pomoci? Stačila by jen část kódu na to aby exel uměl otevřít složku a tam vyhledat sešity které jsou pojmenovány v buňkách již otevřeného sešitu a postupně je otvírat, to kopírování určitých buněk a vkládání bych už zkusil udělat sám...snad :)citovat
#037304
elninoslov
Napr. takto.
Příloha: zip37304_import-dat-2.zip (27kB, staženo 180x)
citovat
#037357
avatar
elnisove, děkuji ti mnohokrát, funguje to naprosto úžasně, kód je na mě celkem rozsáhlý, ale snad mu porozumím. Jsem teď na dovči tak se na to pak kouknu zblízka. A pokud bych měl problém, tak ozvu.
Ještě jednou děkuji a bude i něco na pivo :) protože mi to ulehčí práci.citovat
#037428
avatar
Rád bych se zeptal, zda lze přes VBA otvírat zástupce .xlsx souboru, nebo lze otvírat jen soubory?citovat
#037429
Hav-Ran
Vyskúšal som to a zaznamenal ako makro:

Workbooks.Open Filename:="C:\zzz\HNonline_201708.xlsm"

- pričom zástupca (.lnk) mal v sebe odkaz na túto adresu.
Prakticky to teda ide, ale ty si asi chcel vo VBA zadať adresu s .lnk

takže makro
Workbooks.Open Filename:="C:\zzz\HNonline_201708 – zástupce.lnk"

ide taktiež 1citovat
#037458
avatar
Jejda díky moc, hodně jednoduché řešení... mě to ani nenapadlo :)citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09