title image


Smiley Re: Datei-neu-Dialog immer in Listenansicht?
Hallo Thomas,



in Word XP kann man es ohne SendKeys direkt ausprogrammieren:

Sub ShowFileDialog()

'Word XP

Dim dlgOpen As FileDialog, DefDocPath

DefDocPath = Dialogs(wdDialogToolsOptionsFileLocations).Setting

ChangeFileOpenDirectory DefDocPath



Set dlgOpen = Application.FileDialog(FileDialogType:=msoFileDialogOpen)

With dlgOpen

.AllowMultiSelect = False

.InitialView = msoFileDialogViewList

'msoFileDialogViewDetails, msoFileDialogViewProperties

.Show

End With

End Sub

Weshalb die SendKeys-Methode einmal funktioniert und einmal nicht, weiss ich auch nicht. Vielleicht hängt es u.a. mit mit Betriebssystem und Bildschirmtreiber zusammen.



      Hubert





geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: