ich mal wieder mit einer für mich nicht lösbaren Aufgabe!
Ich erstelle ein Verzeichnis für eine Combobox wie folgt:
Private Sub UserForm_Initialize()
Dim strPath As String
Dim strFile As String
Dim strTabName As String
strPath = "H:\Pfad\Pfad\"
strFile = Dir(strPath & "*.pdf")
With ComboBox1
.Clear
Do Until strFile = ""
.AddItem Left(strFile, Len(strFile) - 4)
strFile = Dir
Loop
End With
End Sub
Ich habe einen Suchbegriff der in der ausgewählten Datei gesucht werden soll.
Die Suche mit festem Pfad zur PDF klappt wunderbar, ich möchte aber die
Datei in der ich suchen möchte vorher in der Combobox auswählen!!!?
pfad_zum_reader = "C:\Pfad\Pfad\Pfad\Pfad\AcroRd32.exe"
pfad_zur_datei = "H:\Pfad\Pfad\Blabla.pdf" '(hier also irgendwas wie "Like Combobox"....)
suchbegriff = ActiveCell.Value
Shell pfad_zum_reader & " /A search=" & suchbegriff & " " _
& pfad_zur_datei, vbMaximizedFocus
End Sub
Vielen Dank für mögliche Lösungen.
Gruß
Nilo