title image


Smiley Re: Shortcut für Word ohne leeren Dokument ?
Hallo Dieter,



hier der Code:



Du kannst das ganze ja auch mal testen indem die mit der Maus einen Shortcut

erzeugst und unter rechte Maustaste->Eigenschaften mal den Parameter /n setzt.



Vielen Dank



Kowalski !



Dim WSHShell As Object

Dim FSO As Object

Dim Scut, DestFolder As Folder



Set WSHShell = CreateObject("Wscript.Shell")

Set FSO = CreateObject("Scripting.FileSystemObject")

If Not FSO.FileExists(WSHShell.SpecialFolders("Desktop") & "\Winword.exe.lnk") Then

Set DestFolder = FSO.GetFolder(WSHShell.SpecialFolders("Desktop"))

Set Scut = WSHShell.CreateShortcut(DestFolder.Path & "\Winword.exe.lnk")

Scut.TargetPath = Progpath$ & "Winword.exe /n" '/n muss nach Anführungsstrichen

Scut.Save

Set Scut = Nothing

End If



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: