【VBA】文字列の連結（&、+）数値と文字列での使用は注意が必要

Sub test1()
    Dim string1 As String, string2 As String
    Dim string3 As String, string4 As String
    
    ' &で文字列連結
    string1 = ">こんにちは。" & "いい天気ですね。"
    string2 = string1 & vbCrLf & "散歩にいきませんか？" & vbCrLf
    Debug.Print string2

    ' + で文字列連結    
    string3 = ">こんにちは。" + "いい天気ですね。"
    string4 = string3 + vbCrLf + "散歩にいきませんか？" & vbCrLf
    Debug.Print string4
    
End Sub

>こんにちは。いい天気ですね。
散歩にいきませんか？

>こんにちは。いい天気ですね。
散歩にいきませんか？

Sub test2()
    Debug.Print ">&で文字列と数値連結"
    Debug.Print "あ" & 12345
    Debug.Print 12345 & "あ"
    Debug.Print vbCrLf
    
    Debug.Print ">+で文字列と数値連結"
    Debug.Print "あ" + 12345
    Debug.Print 12345 + "あ"
    Debug.Print vbCrLf
    
    Debug.Print ">+で文字列と数値文字列連結"
    Debug.Print "あ" + "12345"
    Debug.Print "12345" + "あ"
    Debug.Print vbCrLf
    
    Debug.Print ">+で数値文字列と数値を連結⇒加算"
    Debug.Print "12345" + 1
    Debug.Print 1 + "12345"
    Debug.Print vbCrLf
    
    Debug.Print ">+で数値と数値を連結⇒加算"
    Debug.Print 12345 + 1
    
    Exit Sub
EHandler:
    Debug.Print Err.Description
    Resume Next
End Sub

>&で文字列と数値連結
あ12345
12345あ

>+で文字列と数値連結
型が一致しません。
型が一致しません。

>+で文字列と数値文字列連結
あ12345
12345あ

>+で数値文字列と数値を連結⇒加算
 12346 
 12346 

>+で数値と数値を連結⇒加算
 12346 

Sub test2()
    Dim string1 As String
    
    string1 = Cells(2, 2) & Cells(3, 2) _
                & vbCrLf & Cells(4, 2)

    Debug.Print string1
End Sub

こんにちは。いい天気ですね。
散歩にいきませんか？