Fotos per VBA öffnen
27.02.2018 10:28:40
Kurt
weiß jemand, wie ich am besten Fotos unter Windows 10 (Excel 2016) per VBA öffnen kann?
Unter Windows 7 (Excel 2010)habe ich es bisher so gemacht:
Private Sub FotosÖffnern()
dim FotoOrdner as string, Ergebnis as string
FotoOrdnerPfad= "C:\Foto Ordner"
Anwendung = Chr(34) & "C:\Program Files\Microsoft Office\Office14\OIS.EXE" & Chr(34) & Chr(32) & _
Chr(32) & Chr(34) & FotoOrdnerPfad & Chr(34)
Ergebnis = Shell(Anwendung, 1)
End Sub
Vielen Dank.
Gruß,
Kurti