Am einfachsten läßt Du den Kunden die Datei selbst suchen, indem Du den Datei öffnen Dialog aufrufst:
Dim
strDateiName
As
String
strDateiName = Application.GetOpenFilename(
"Excel-Arbeitsmappen (*.xls), *.xls"
, , , ,
False
)
'Falls mehrere Dateien ausgewählt werden dürfen muß es
Variant
True
'heißen. In diesem Fall ist strDateiName ein Array.
Bitte geben Sie ein aussagekräftiges Thema an. Bitte geben Sie eine gültige Email Adresse ein!