Does anyone know the code to call up the calculator?

Sub Macro1()
Application.ActivateMicrosoftApp Index:=0
End Sub

--
Gary''s Student - gsnu200781


"MWhaley" wrote:

Does anyone know the code to call up the calculator?

That works great Gary Thanks a lot

"Gary''s Student" wrote:

Sub Macro1()
Application.ActivateMicrosoftApp Index:=0
End Sub

--
Gary''s Student - gsnu200781


"MWhaley" wrote:

Does anyone know the code to call up the calculator?

You are very welcome! If you get tired of "calculating", use a -1 rather than
0 in the macro.
--
Gary''s Student - gsnu200781


"MWhaley" wrote:

That works great Gary Thanks a lot

"Gary''s Student" wrote:

Sub Macro1()
Application.ActivateMicrosoftApp Index:=0
End Sub

--
Gary''s Student - gsnu200781


"MWhaley" wrote:

Does anyone know the code to call up the calculator?

Is this some sort of "Easter Egg" program hidden away in Excel? If so, I'm
thinking it may have been removed with the latest Service Pack. I have Excel
2003 and when I execute that statement I get the following error...

Run-time error '1004':

Cannot run 'SOL.EXE'. The program or one of its
components is damaged or missing

Rick

"Gary''s Student" wrote in message
...
You are very welcome! If you get tired of "calculating", use a -1 rather
than
0 in the macro.
--
Gary''s Student - gsnu200781


"MWhaley" wrote:

That works great Gary Thanks a lot

"Gary''s Student" wrote:

Sub Macro1()
Application.ActivateMicrosoftApp Index:=0
End Sub

--
Gary''s Student - gsnu200781


"MWhaley" wrote:

Does anyone know the code to call up the calculator?

On my system it runs Solitaire located in:

C:\WINDOWS\system32\sol.exe

I am using WinXP
--
Gary''s Student - gsnu200781


"Rick Rothstein (MVP - VB)" wrote:

Is this some sort of "Easter Egg" program hidden away in Excel? If so, I'm
thinking it may have been removed with the latest Service Pack. I have Excel
2003 and when I execute that statement I get the following error...

Run-time error '1004':

Cannot run 'SOL.EXE'. The program or one of its
components is damaged or missing

Rick

"Gary''s Student" wrote in message
...
You are very welcome! If you get tired of "calculating", use a -1 rather
than
0 in the macro.
--
Gary''s Student - gsnu200781


"MWhaley" wrote:

That works great Gary Thanks a lot

"Gary''s Student" wrote:

Sub Macro1()
Application.ActivateMicrosoftApp Index:=0
End Sub

--
Gary''s Student - gsnu200781


"MWhaley" wrote:

Does anyone know the code to call up the calculator?

That's a new one for me... interesting, though, it seems Index=0 is not
documented in the help files.

By the way, there is a shorter statement that will also bring up the
calculator (on PCs)...

Shell "Calc"

Rick


"Gary''s Student" wrote in message
...
Sub Macro1()
Application.ActivateMicrosoftApp Index:=0
End Sub

--
Gary''s Student - gsnu200781


"MWhaley" wrote:

Does anyone know the code to call up the calculator?