Excel - Een macro om een ​​bestand te openen met Kladblok

Kwestie

Ik wil graag een bestand openen met Kladblok. Ik heb een kleine macro voor dit doel, maar het probleem is dat de code mijn bestand opent met Word, in plaats van Notepad.

 Subbloc () Dim s As Variant Dim i As Integer s = Shell ("C: \ Program Files \ Microsoft Office \ Office12 \ WINWORD.EXE C: \ Users \ Username \ Desktop \ filename.txt") 

Oplossing

Vervang de WINWORD.EXE door notepad.exe:

 s = Shell ("C: \ Program Files \ Microsoft Office \ Office12 \ notepad.exe C: \ Users \ Gebruikersnaam \ Desktop \ bestandsnaam.txt")