in einer Listbox auf einer frm lasse ich mir die Dateien eines Ordners mit vollständigen Namen und Pfad anzeigen.
Dann wähle ich in der Listbox einen Eintrag und muss je nach Ändung auf einen Button klicken.
Wenn es ein WordDoc ist, liegt hinter dem Button:
Private Sub CommandButton1_Click()
Dim Datei
Datei = ListBox1
CreateObject("word.application").Documents.Open("" & Datei).Application.Visible = True
End Sub
Bei Excel und pdf entsprechend der Endung genauso.Frage: kann ich den Code zum öffnen verallgemeinern, dass automatisch das erforderliche Prog geöffnet wird, so wie wenn man im Explorer eine Datei auswählt.
Viele Grüße aus Hamburg Sonne, nicht kalt aber feucht
Ray