Hallo NoNet!
Danke für Deine Hilfe.Würde alles passen.
Ich habe jedoch 2 CommandButton und möchte mit einem Word mit dem anderen PDF Dateien auswählen.
Wenn ich jetzt Deinen code für PDF umändere so erhalte ich eine Fehlermeldung mit Listentrennzeichen und Dateiauswahl wird gelb markiert.
Was habe ich hier bitte falsch gemacht?
Josef
Private Sub CommandButton26_Click()
Dim Dateiname2
Dateiname2 = Application.GetOpenFilename _
("PDF-Dateien (*.pdf), *.pdf, , "Dateiauswahl", , False)
If Dateiname2 False Then
TextBox19.Text = Dateiname2
End If
End Sub
geschrieben von
josef5
,
02.04.2006, 17:41 Uhr
, 25 mal gelesen