Open Text File From Desktop With Macro

[indi visual]

I have this below and it works fine.

Shell "notepad.exe "C:usersanonymousdesktopexported-me.txt", vbMaximizedFocus


But this is specific to my pc only, and I was wanting something more versatile.

I need something like this but I keep having problems.


ThisWorkbook.Path & "Exported-Me.txt"


I keep getting errors?

 

[Hui]

Modify the following to suit

[pre]

Sub Test()
Dim t1 As String, t2 As String, t3 As String, t4 As String

t1 = "notepad.exe"
t2 = Application.ThisWorkbook.Path
t3 = "exported-me.txt"

t4 = t1 + " " + t2 + t3

Shell t4, vbMaximizedFocus
End Sub

[/pre]

 

[indi visual]

Lazer point precision.


Many thanks Hui