Anonymní profil Marek Sz – Programujte.com

#2 Marek Sz

Nevím z jakého důvodu mi to přestalo pracovat ale možná že tam chybí nějaké to

 If SouboryKtere = Konec Then Exit Do 

Dělá mi to že se mě to nezastaví funguje mi to dobře ale když to přijde na konec tak se mě to nezastaví a pokračuje znova nevím několikrát jsem to zkoušel a fungovalo to dobře zastavilo se to na konci ale teď to pořád jede a nezastaví jestli by někdo věděl proč se to nezastaví? 

#12 pee-jay_cz
#12 pee-jay_cz

Děkuji opravdu za návod tak jsem se tehdy snažil to rozchodit ale vzdal jsem to neměl jsem čas na to si to rozebrat až teď jsem to rozchodil ale jen jedna věc mě teď trápí je to možná primitivní věc ale nemohu nasměřovat to do souboru kde to chci projít

zkoušel jsem toto

 ChDrive "F"
adresar = "F:\Marek aktualizace\"
ChDir adresar
SouboryKtere = Dir("*.docx")

 FindWhere = Documents.Open FileName:=adresar & "\" & SouboryKtere 
 IndexujZavorky FindWhere

Bude to fungovat? 

děkuji za odpověď ale nějak mi to nejde nahradit