prosím o pomoc, jak zobrazit hodnotu z jiného listu. Samotný vzorec znám, ale jak to udělat, když v odkazu =List3!A1 potřebuju měnit právě tu hodnotu "List3" podle hodnoty třeba z buňky e5. Když do buňky e5 zadám třeba "List2", tak aby se mi to automaticky přepsalo v tom vzorečku. Děkuji předem za radu.
a nakonec si odpovím taky já . stačí zadat jednoduchý kód
Private Sub CommandButton1_Click()
If Len(Dir("Faktury", vbDirectory)) = 0 Then
MkDir "Faktury"
ChDir "Faktury"
MkDir "2011"
ChDir ".."
ChDir ".."
MsgBox "právě byl vytvořen"
Else: MsgBox "existuje"
End If
End Sub
a bude se jakoby vytvářet pořád jeden a tentýž adresář a podadresář. Schválně nemám v kodu MKdir psanou cestu Path, protože takhle mi to v 99% vytváří adresáře v dokumentech. Čao
tak částečně vyřešeno. Po zadání kódu:
Private Sub CommandButton1_Click()
If Len(Dir("Faktury", vbDirectory)) = 0 Then
MkDir "Faktury"
MsgBox "právě byl vytvořen"
Else: MsgBox "existuje"
End If
End Sub
pokud není vytvořen adresář "Faktury", tak ho vytvoří, pokud již existuje, tak napíše, že "existuje". Ještě bych chtěl vytvořit vnořený adresář "2011". Problém je, že když to takhle vytvořím, tak mi to při dalším uložení vytovří nový adresář "Faktury" ve složce "2011" a v ní opět složku "2011". Zkuste ještě někdo poradit, používám jednoduché kódy MkDir a ChDir, viz. příloha na www.pcman.cz/dokumenty/p.xls . Díky za případné náměty.
ahoj vseci, prosim o radu. Kdyz vytvorim adresar pomoci VBA a ulozim do nej sesit, vse OK. Pokud ale chci ulozit dalsi sesit, tak mi to napise error 75, pravdepodobne proto, ze ten adresar uz existuje. Je nejaka moznost toto upravit. Nechci natvrdo vytvaret adresare, protoze to delam pro jednoho zednika a nechci ho nechat vytvaret adresare. Pomuze nekdo?
Mam i cvicny sesit, ale nedari se mi vlozit, chce to opsat kontrolni kod, ale nikde zadny nevidim .... .
Kdyz tak vzorovy sesit je na adrese http://www.pcman.cz/dokumenty/p.xls
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.