Trouble with exit
 

Hello,

I trying to detect if the aplication is running on a Mac

Private Sub Workbook_Open()
#If Mac Then
MsgBox "Sorry this Application runs in Windows only."
SwInicio = True
#End If

If SwInicio = False Then
"Windows intructions"
End if
End Sub

and in that case force the application to quit. Already try with Exi
Sub, but the program jumps to the next subs and continues running.

Any idea?

Thanks in advance.

jose lui

--
jose lui
-----------------------------------------------------------------------
jose luis's Profile: http://www.excelforum.com/member.php...fo&userid=1331
View this thread: http://www.excelforum.com/showthread.php?threadid=26172

Trouble with exit
 

Hi Jose

Use this
Application.Operatingsystem

See Help for more details


--
Regards Ron de Bruin
http://www.rondebruin.nl


"jose luis" wrote in message ...

Hello,

I trying to detect if the aplication is running on a Mac

Private Sub Workbook_Open()
#If Mac Then
MsgBox "Sorry this Application runs in Windows only."
SwInicio = True
#End If

If SwInicio = False Then
"Windows intructions"
End if
End Sub

and in that case force the application to quit. Already try with Exit
Sub, but the program jumps to the next subs and continues running.

Any idea?

Thanks in advance.

jose luis


--
jose luis
------------------------------------------------------------------------
jose luis's Profile: http://www.excelforum.com/member.php...o&userid=13312
View this thread: http://www.excelforum.com/showthread...hreadid=261729