Val() converts numerical to string data
Sub valDemo() num1 = 5 strV = "5" num2 = num1 + Val(strV) End Sub