Get the variable type for Variant
Sub VariantExample() Dim varAnyThing As Variant varAnyThing = 12.345 Debug.Print VarType(varAnyThing) varAnyThing = 12.345 varAnyThing = varAnyThing & " is a number" Debug.Print VarType(varAnyThing) varAnyThing = 12.345 varAnyThing = varAnyThing + "10" Debug.Print VarType(varAnyThing) varAnyThing = 12345 Debug.Print VarType(varAnyThing) varAnyThing = 123456 Debug.Print VarType(varAnyThing) End Sub