Use Str() function to help document your code when concatenating strings.
Sub plusDemo() Dim zip As String Dim zipx As String zip = 55555 zipx = 4444 newzip = str(zip) + str(zipx) End Sub