Hi.

This code should do what you want it checkes to see what the "OS" is.

[code
Sub Test_Me()
Dim TheOS As String
TheOS = Application.OperatingSystem
If Left(TheOS, 7) <> "Windows" Then
Call Your mac code
else
call your windows code
end if

End Sub