< návrat zpět

MS Excel


Téma: Přenos dat rss

Zaslal/a 30.3.2019 1:09

LugrDobrý den,

mám makro na přenos dat, z jednoho sešitu do druhého, jednu část mám vyřešenou, ale s tou druhou si nevím rady. Je to ta část kdy potřebuji data přiřadit k datumu (29.03.19) v týdnu.

Zvládl by mi někdo pomoci?

Děkuji

Příloha: zip43056_prenos-dat.zip (41kB, staženo 26x)
Zaslat odpověď >

Strana:  1 2   další »
#043059
elninoslov
Ten list sa volá v zdrojových súboroch vždy rovnako ? Ak áno, tak súbor neotvárajte, to je najpomalšie. Namiesto toho, vložte odkazy pomocou vzorcov na bunky daného súboru s následným prevodom na hodnoty. Je to rýchle.

Ak sa ten list nevolá rovnako, tak je ešte možnosť napr. cez ADO zistiť názov listu, čo bude tiež rýchlejšie ako Open.

Aj tak tam ale vidím riziko, že niekto otvorí omylom úplne iný súbor XLS, ktorý nebude mať s požadovanými dátami nič spoločné. Chcelo by to ešte nejakú kontrolu validity súboru.
Příloha: zip43059_cil.zip (33kB, staženo 26x)
citovat
#043061
Lugr
Zdrojový soubor má vždy přidělený datum (např. 2019.03.29_Zdroj), ale list se vždy jmenuje stejně.

Zkusím to implementovat do mého souboru.

Moc si vážím pomoci a děkuji.citovat
#043062
Lugr
Tak to funguje super, děkuji.citovat
#043085
Lugr
Mohl bych mít ještě jednu prosbu?

Šlo by místo ručního výběru souboru použít InputBox
Když zdrojový soubor má vždy přidělený datum (např. 2019.03.29_Zdroj) do InputBox by se zapsal datum a makro by si doplnilo &"_Zdroj" vyhledalo atd...?
Příloha: png43085_inputbox.png (4kB, staženo 33x)
43085_inputbox.png
citovat
#043086
elninoslov
Skúste takéto niečo na rýchlo. Dvojklik na dátum v riadku 7, 26, 45 importne súbor s daným dátumom ak existuje v adresári s týmto súborom.
Příloha: zip43086_prenos-dat.zip (72kB, staženo 22x)
citovat
#043087
Lugr
Tý jo, to je na rychlo jo? 1 Já bych to vymýšlel roky stejně bych nic nevymyslel.

Nešlo by to tam spíše nějak zapsat toto:

Sub Import_dat()

Datum = InputBox("Zapište datum.")
ok = Append("C:\Users\lukas\OneDrive\Plocha\Prenos dat" & Datum & "_Zdroj.xls")
' zde by makro poračuje
'
'
'citovat
#043089
elninoslov
???
Příloha: zip43089_cil.zip (34kB, staženo 24x)
citovat
#043090
Lugr
Hned jak budu u PC, kouknu na to. Děkuju za tak rychlou zpětnou vazbu.citovat
#043091
Lugr
Bohužel soubor Cíl není součástí složky se soubory Zdroj a v makru mi teď pro změnu chybí cesta k souborům Zdroj.

něco jako:
C:\Users\lukas\Downloads\43086_prenos-dat\Prenos dat\Format(Datum, "yyyy.mm.dd") & "_Zdroj.xls

Omlouvám se jestli jsem to nezmínil.citovat
#043092
elninoslov
To je len 1 riadok s premennou.
Příloha: zip43092_cil.zip (34kB, staženo 28x)
citovat

Strana:  1 2   další »

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