EXCEL VBA 演算子・文字列結合の使い方（計算式）

EXCEL VBA 演算子・文字列結合の使い方

Sub Enzanshi()

    Dim Kekka, A, B As Long
    
    A = 10
    B = 3
    
    Kekka = A + B '-----------------加算①
    
    MsgBox "A＋Bは、" & Kekka & "です。"
     
    Kekka = A - B '-----------------減算②
    
    MsgBox "A-Bは、" & Kekka & "です。"

    Kekka = A * B '-----------------乗算③

    MsgBox "A×Bは、" & Kekka & "です。"

    Kekka = A / B '-----------------除算④

    MsgBox "A÷Bは、" & Kekka & "です。"
    
    Kekka = A ^ B '-----------------べき乗⑤

    MsgBox "A ^ Bは、" & Kekka & "です。"
    
    Kekka = A Mod B '-----------------余り⑥

    MsgBox "A ÷ Bの余りは、" & Kekka & "です。"
    
    Kekka = A \ B '-----------------商⑦

    MsgBox "A \ Bの商は、" & Kekka & "です。"
  
End Sub

Sub Mojiketusgou()

    Dim Moji_A, Moji_B As String
    Dim Suji_A, Suji_B, Suji_G As Long
    
    
    Moji_A = "株式会社"
    Moji_B = "ABC商事"
    
    Suji_A = 10
    Suji_B = 20

    MsgBox Moji_A & Moji_B   '文字列結合 & の場合①
    MsgBox Moji_A + Moji_B   '文字列結合 + の場合②

    MsgBox Suji_A & Suji_B  '数字結合 & の場合③
    MsgBox Suji_A + Suji_B  '数字結合 + の場合④
    
    
    
    Suji_G = Suji_A & Suji_B  '数字結合 & の場合⑤
    MsgBox Suji_G
    
    Suji_G = Suji_G + 1 '数字結合したデータに＋１した場合⑥
    MsgBox Suji_G
    
    
End Sub