Hi,
Got a small check where I’m trying to secure that the user has in fact selected a chart before firing a formatting macro. Has so far worked fine but testing it now with a range or single cell selected in a worksheet, it does not enter the ‘Msgbox’ option informing the user of the incorrect selection. Can anybody tell me what’s wrong here…??
Sub CheckSelection
Debug.Print TypeName(Selection)
Select Case TypeName(Selection)
Case “ChartArea”, “PlotArea”, “Series”, “Legend”, “Axis”, “ChartTitle”
‘Everything’s fine do nothing
Case “Nothing” Or “Range”
MsgBox “Please click on the chart you want to format before you proceed”, vbInformation, CoName
End Select
End Sub
