Excel - Ein Makro zum Öffnen einer Datei mit Notepad

Problem

Ich möchte eine Datei mit Notepad öffnen. Ich habe ein kleines Makro für diesen Zweck, aber das Problem ist, dass der Code meine Datei mit Word anstelle von Editor öffnet.

 Unterblock () Dim s As Variant Dim i As Integer s = Shell ("C: \ Programme \ Microsoft Office \ Office12 \ WINWORD.EXE C: \ Benutzer \ Benutzername \ Desktop \ Dateiname.txt") 

Lösung

Ersetzen Sie das WINWORD.EXE durch notepad.exe:

 s = Shell ("C: \ Programme \ Microsoft Office \ Office12 \ notepad.exe C: \ Benutzer \ Benutzername \ Desktop \ Dateiname.txt")