Slim8589
06-28-2005, 06:53 PM
I continue to struggle with vba excel on my mac.
Among many issues this one is currently taxing me
Dim result As VbMsgBoxResult
seems to throw up an automation not supported error as does any attempt to dim other msgbox attributes.
Do I take it that I can't do it?
the full code, which is fine on a pc, is below.
Any clues?
Dim strMessage, strTitle As String
Dim style As VbMsgBoxStyle
Dim result As VbMsgBoxResult
datecompare = Format(ActiveCell.Value, "d-mmm-yy")
If datecompare = txtDate.Value Then
strMessage = "You have already entered this date once. Do you wish to enter this date again?"
strTitle = "Repeated date message"
style = vbYesNo + vbExclamation + vbDefaultButton2
result = MsgBox(strMessage, style, strTitle)
If result = vbNo Then 'takes you back to menu sheet
Worksheets("Menu").Select
End
End If
Among many issues this one is currently taxing me
Dim result As VbMsgBoxResult
seems to throw up an automation not supported error as does any attempt to dim other msgbox attributes.
Do I take it that I can't do it?
the full code, which is fine on a pc, is below.
Any clues?
Dim strMessage, strTitle As String
Dim style As VbMsgBoxStyle
Dim result As VbMsgBoxResult
datecompare = Format(ActiveCell.Value, "d-mmm-yy")
If datecompare = txtDate.Value Then
strMessage = "You have already entered this date once. Do you wish to enter this date again?"
strTitle = "Repeated date message"
style = vbYesNo + vbExclamation + vbDefaultButton2
result = MsgBox(strMessage, style, strTitle)
If result = vbNo Then 'takes you back to menu sheet
Worksheets("Menu").Select
End
End If