txt aus Excel per Makro öffnen

Question

Hallo,

ich habe eine Excel mit mehreren Makros. Eine Doku dazu befindet sich in einer TXT-Datei. Diese möchte ich mit einem Button öffnen...

Wie kann ich das umsetzen?

Answer 1

Hallo gustavin,

das geht z.B. mit nachfolgendem Makro.

Kopiere das Makro in ein StandardModul und starte es z.B. über eine Befehlsschaltfläche
Teste das Makro aber bitte in einer Testdatei und nicht gleich in Deiner Originaldatei.

Option Explicit

Sub txt_öffnen()
Shell ("notepad.exe C:\Eigene Dateien\Textdokument.txt")
End Sub
Pfad und Dateiname musst Du anpassen.


MfG,
Oliver
[sub]Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du[/sub]
[sup] ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.[/sup]

Answer 2

Hallo,

ich nochmal. Damit das Textdokument auch gleich im Vordergrund angezeigt wird, erweitere den Code um

, vbNormalFocus
Somit sieht das Makro dann wie folgt aus:

Option Explicit

Sub txt_öffnen()
Shell "notepad.exe C:\Eigene Dateien\Textdokument.txt", vbNormalFocus
End Sub



MfG,
Oliver
[sub]Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du[/sub]
[sup] ein Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.[/sup]