VBA의 합계 함수 (숫자 및 문자열)

VBA에서 :

Sub dural()
    MsgBox Application.WorksheetFunction.Sum(5, Range("A1").Value)
End Sub

또는 JNevill이 지적한대로 :

Sub dural2()
    MsgBox Evaluate("SUM(5,A1)")
End Sub

편집하다:

다음은 몇 가지 대안입니다.

Sub poiuyt()
    MsgBox Application.WorksheetFunction.Sum(5, [A1])
    MsgBox 5 + [A1]
End Sub

셀에 수식을 넣으려면 (예 : 셀 B9 ) 다음을 사용하십시오.

Sub PutFormulaInCell()
    Range("B9").Formula = "=SUM(5,A1)"
End Sub