You have posted in an end-user NG. For help with VBA, you would be better
advised to post in one of the word.vba NGs (such as the one titled
"Programming" in the Communities interface).
--
Suzanne S. Barnhill
Microsoft MVP (Word)
Words into Type
Fairhope, Alabama USA
Word MVP FAQ site:
http://word.mvps.org
Email cannot be acknowledged; please post all follow-ups to the newsgroup so
all may benefit.
"Ian" wrote in message
...
I have a problem with a Macro created:
Sub Font()
'
' Font Macro
' Macro recorded 03/01/2007 by Administrator
'
If MsgBox("Are you sure you want a massive font?", vbYesNo,
"Sure?")
= vbYes Then
Selection.WholeStory
Selection.Font.Size = 72
If MsgBox("Are you sure you want it this massive?",
vbYesNo)
= vbNo Then
Selection.WholeStory
Selection.Font.Size = 32
Else
End If
Else
End If
End Sub
On some pc's where I wokr it will not change the font size until after the
second message, preventing the inital font size to change,
whereas on other machines it will change the font size before the second
message, working correctly as it should.
Any help on this would be greatly appreciated
Cheers