InitialFileName
02.09.2013 13:58:39
MPR
ich bin neu auf dem Forum und möchte ein sehr nettes Hallo sagen.
Ich habe ein Problem mit der Funktion FileDialog(msoFileDialogFilePicker). Mein code sieht so aus:
Dim dlgSaveAs As FileDialog
Set dlgSaveAs = Application.FileDialog(msoFileDialogFilePicker)
With dlgSaveAs
.AllowMultiSelect = False
.InitialFileName = "\Vorlage_Budgetbersicht_EAD_kurz_20130821.*x*"
.Show
MusterPres = .SelectedItems(1) '& "Vorlage_Budgetbersicht_EAD_kurz_20130821.pptx"
End With
Es funktioniert wie ich erwarte mit kleiner Ausnahme, nämlich. Nur ein Paar letzten zeichen werden dargestellt (siehe Bild: http://img194.imageshack.us/img194/8946/3d8n.jpg).
Wie kann ich einstellen, dass das String komplett dargestellt wird?
Vielen Dank im Voraus