Hi,
I have a very small macro shown below to insert an X mark then move to the next cell. When I first created this macro the last command was as follows : Sendkeys “{TAB}”. The story is this, I am using Excel 2007 in a Win 7 Virtual Desktop – whenever I ran the macro in this environment, the Numlock would turn off and if I ran it a second time Numlock turned back on :confused: – If I ran it under my normal XP desktop version of Excel 2007 – no issue. This was very annoying and I had to change the code to that shown below to stop the Numlock issue. Does anyone know why this should happen.
Sub XMark()
‘
‘ XMark Macro
‘ Insert X in Wingdings font
‘
‘
ActiveCell.FormulaR1C1 = “û”
With Selection.Font
.Name = “Wingdings”
.Size = 14
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ThemeColor = xlThemeColorLight1
.TintAndShade = 0
.ThemeFont = xlThemeFontNone
End With
With Selection
.HorizontalAlignment = xlCenter
End With
ActiveCell.Offset(0, 1).Select
End Sub
Regards,
Maria