Mega Code Archive - VisualBasic Script - Data Type - Identifying the type of a selected object

Sub ShowSelectionType() Dim SelType As String SelType = TypeName(Selection) MsgBox SelType End Sub