Hallo Günter,
Danke für den Code!
Kleine Ergänzung: anstatt die “gebastelte” TempPath Funktion kann man das aktuelle Temp-Verzeichnis auch einfach per Environ(“temp”) ermitteln.
Also
strDateiname = TempPath & “Scan.jpg” ‘ set temporary file
durch
strDateiname = Environ(“temp”) & “Scan.jpg” ‘ set temporary file ersetzen.
Gruß
Fabian