Code: Select all
Sub E_Right_Click()
Application.CommandBars("Cell").Reset 'to reset any changes made
With Application.CommandBars("Cell").Controls.Add(msoControlButton, 3058, , 5, False)
.Caption = "Conditional Formatting..."
'.FaceId = 481
End With
'
With Application.CommandBars("Cell").Controls.Add(msoControlButton, 2034, , 5, False)
.Caption = "Validation..."
End With
End Sub
I'm now in Excel 2007 (and 2010); I haven't tested but I'm almost sure this won't work... so how do I get this done now?