Ich quäle mich die ganze Zeit mit dem Problem herum, eine mit Excel erstellte Textdatei ("c:\test.txt") über VBA im Texteditor (also Windows Notepad) zu öffnen! Kann mir jemand sagen wie das geht?
Beste Grüße,
Martin
Sub NotePadAuf()
Shell "C:\WINDOWS\Notepad.exe H:\EXCEL\Muell\Spalte.txt", 1
End Sub
Um eine Textdatei über VBA im Windows Notepad zu öffnen, kannst du die Shell-Funktion verwenden. Hier ist eine einfache Anleitung:
Öffne den Excel VBA-Editor, indem du ALT + F11 drückst.
Füge ein neues Modul hinzu, indem du im Menü auf Einfügen > Modul klickst.
Kopiere und füge den folgenden Code in das Modul ein:
Sub NotePadAuf()
Shell "C:\WINDOWS\Notepad.exe C:\test.txt", vbNormalFocus
End Sub
Stelle sicher, dass der Pfad zur Textdatei korrekt ist. In diesem Beispiel ist der Pfad C:\test.txt.
Führe das Makro aus, indem du auf F5 drückst oder über das Menü Ausführen > Sub/UserForm ausführen gehst.
Jetzt sollte die Textdatei im Notepad geöffnet werden.
Fehler: Die Textdatei öffnet sich nicht.
Fehler: Windows Notepad wird nicht gefunden.
notepad++ verwenden, indem du den Pfad zu notepad++.exe angibst.Wenn du alternative Texteditoren verwenden möchtest, kannst du den Code anpassen. Hier sind zwei Beispiele:
Notepad++ verwenden:
Sub NotepadPlusAuf()
Shell "C:\Program Files\Notepad++\notepad++.exe C:\test.txt", vbNormalFocus
End Sub
Einen anderen Texteditor öffnen:
Du kannst auch andere Texteditoren wie VBA Text Editor oder Windows Editor verwenden, indem du den entsprechenden Pfad angibst.
Hier sind einige Beispiele, wie du verschiedene Textdateien mit unterschiedlichen Editoren öffnen kannst:
Beispiel 1: Öffne eine Textdatei mit dem Windows Editor.
Sub WindowsEditorAuf()
Shell "notepad C:\test.txt", vbNormalFocus
End Sub
Beispiel 2: Öffne eine Textdatei mit Notepad++.
Sub NotepadPlusAuf()
Shell "C:\Program Files\Notepad++\notepad++.exe C:\test.txt", vbNormalFocus
End Sub
vbHide anstelle von vbNormalFocus, wenn du das Programm im Hintergrund ausführen möchtest.1. Wie öffne ich eine andere Textdatei? Ändere einfach den Pfad in deinem VBA-Code zu der gewünschten Textdatei.
2. Kann ich den Code für andere Programme verwenden?
Ja, die Shell-Funktion kann für das Öffnen vieler Programme verwendet werden, solange du den richtigen Pfad angibst.
3. Was mache ich, wenn Notepad++ nicht installiert ist? Stelle sicher, dass Notepad++ auf deinem Computer installiert ist und passe den Pfad in deinem Code entsprechend an. Ansonsten kannst du auch den Windows Editor verwenden.