Forums Neueste Beiträge
 

PDF-Datei suchen und umbenennen

26/11/2009 - 18:24 von Stefan J. | Report spam
Habe meinen PDF-writer so eingestellt, daß er automatisch Namen vergibt (wg.
anderer Macros). Jetzt drucke ich mir Internetseiten aus, die automatisch auf
C:\
unter http__*.pdf abgelegt werden. Direkt nach der Ausgabe soll aber das
Macro eine Umbenennung in einen Namen, der in einer Zelle abgelegt ist,
vornehmen.

Was fehlt hier bzw. wo liegt der Fehler?

Sub httpPDF_verlinken()

Sheets("Adresse einlesen").Select
Range("B32").Select
Name "C:\Dokumente und Einstellungen\Eigene Dateien\ _
Eigene Dokumente\http___www.*.pdf" _
As "C:\Dokumente und Einstellungen\Eigene Dateien\Eigene Dokumente\" _
& ActiveCell.FormulaR1C1 & ".pdf"
End Sub

Stefan
 

Lesen sie die antworten

#1 Andreas Killer
26/11/2009 - 20:04 | Warnen spam
Stefan J. schrieb:

unter http__*.pdf abgelegt werden. Direkt nach der Ausgabe soll aber das


...
Was fehlt hier bzw. wo liegt der Fehler?


Die Name-Funktion kann keine Wildcards verarbeiten, d.h. die
Dateisuche musst Du schon selber machen.

Schau Dir mal die Dir-Funktion an, mit der kann man einfach nach einer
Datei suchen und diese kann auch Wildcards.

Quelle = Dir("C:\Dokumente und Einstellungen\" & _
"Eigene Dateien\Eigene Dokumente\http___www.*.pdf")

Außerdem musst Du beim Umbenennen berücksichtigen das es die Zieldatei
ggf. schon gibt und dann Abbrechen/Ziel überschreiben/anderes Ziel
wàhlen!?

Andreas.

Ähnliche fragen