|
Hallo,
ich hatte dich so verstanden, dass du noch gar keine Datenbank hast. Und dachte, du möchtest Excel als Datenbank benutzen. Dann habe ich mir das so vorgestellt, dass die Pfade und Dateinamen der Pdf-Dateien irgendwie zeilenweise in ein Exceltabellenblatt geschrieben werden (zum Beispiel in Spalte B).
Um eine Pdf-Datei zu dieser Liste ("Datenbank") hinzuzufügen, klickt man auf einen Button und es öffnet sich ein Fenster (wie wenn man eine Datei öffnen möchte). Man kann in diesem Fenster die Pdf-Datei auswählen und es wird der Dateipfad und Dateiname in eine leere Zeile in Spalte B eingetragen.
Dazu habe ich mir einen weiteren Button vorgestellt, der eine der Dateien öffnet (welche das nun sein soll, weiß ich nicht, da ich ja nicht weiß, was du so vorhast).
Und dann noch einen dritten Button. Klickt man auf den, kann man auswählen, welche Datei aus der Liste gelöscht werden soll.
Die beiden letzten Buttons halte ich für nicht sinnvoll, da würde ich mit einem Hyperlink arbeiten und zum Löschen einfach die Zeile löschen.
Soweit zur Erklärung meines letzten Posts.
Jetzt habe ich verstanden, dass du bereits eine Datenbank hast, die die Dateinamen und Dateipfade beinhaltet.
Dann sehe ich da vor meinem geistigen Auge drei Makros, die in etwa so aussehen:
1 2 3 4 5 6 7 8 9 | sub HolePfadAusDatenbank()
dim sPfad as string
sPfad = ....
thisworkbook.worksheets("Tabelle1").Range("A1").value = sPfad
end sub
|
1 2 3 4 5 6 7 8 9 | sub OeffnePdfDatei()
dim sPfad as string
sPfad = thisworkbook.worksheets("Tabelle1").Range("A1").value
end sub
|
1 2 3 | sub PfadAusZelleEntfernen()
thisworkbook.worksheets("Tabelle1").Range("A1").clearcontents
end sub
|
Grüße, Ulrich
|