For Each List In Sheets
docasna = List.Range("A1:F50")
Next Listcitovat
Zaslal/a Fantasyk 8.2.2020 11:17
Zdravím,
mohl by jste mi někdo poradit s vyhledáváním ?
Mám vytvořené makro: (viz soubor)
A potřebuji poradit, jelikož mi vše funguje správně až na to, že v řádku s makrem:
docasna = ActiveWorkbook.Worksheets("List1").Range("A1:F50") ' uložení hodnoty z buňky A1:F50 na listu 1 do proměnné
Potřebuji, aby to vyhledávalo ve všech listech, ale problém je v tom, že názvy listů se pokaždé mění s názvem souboru.
Bohužel ty soubory odkud je beru to dělá server automaticky.
Díky moc za radu
Fantasyk
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.