Edit with TextEdit via VBA

[Pathagoras]

I need to call Mac's Text editor ("TextEdit") using the shell command in a VBA project.

I was hoping it would be as simple as:

Shell("TextEdit (mytextfile)")

but there is apparently more to it in Apple.

Any ideas. (The Apple Script editor didn't help much.)

[mikerickson]

This worked for me
[VBA]Dim scriptStr As String

scriptStr = "activate application ""TextEdit"""
scriptStr = scriptStr & vbCr & "set miniaturized of window 1 of application ""Microsoft Excel"" to true"

MacScript (scriptStr)[/VBA]

[Pathagoras]

Mike, Thanks. My top question was incomplete. It should have read:

"I need to call Mac's Text editor ("TextEdit") using the shell command in a VBA project and automatically display a specified text file."

It's the second part that is the most critical to my need. Thanks again.

[mikerickson]

[VBA]Sub test()
Dim strScript As String
strScript = strScript & "tell application ""TextEdit"" " & vbCr
strScript = strScript & "open ""Macintosh HD:Users:mericksonocuments:Lyrics:Roll in my sweet baby's arms (explicit).rtf"" " & vbCr
strScript = strScript & "activate" & vbCr
strScript = strScript & "end tell"

MacScript strScript
AppActivate "TextEdit", True
End Sub
[/VBA]

[Pathagoras]

Yessssss!! Perfect. Thanks.