Ve sloupci A mám názvy souborů jpg a potřebuji do sloupce B vypsat zda exitují v určitém umístnění v PC.
Jedná se cca o 1500 položek
Našel jsem pouze tento kód ale nemůžu to nějak rozchodit.
Děkuji za pomoc.
Kód: Vybrat vše
Sub makro()
If Dir("C:\Excel.xls") <> "" Then
Range("a2") = Range("a1")
End If
End Sub