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