Zellenwerte aufaddieren in VBA
09.03.2005 12:49:53
Sergej
Hilft mir bitte!!
ich will zwei Zellenwerten in VBA aufaddiren
Dim D
Dim RWert As Double
Dim rngW1 As Range
Dim rngW2 As Range
Sub Addition()
Set D = ThisWorkbook.Sheets("Dummy")
Set rngW1 = D.Range("H4")
Set rngW2 = D.Range("H5")
rngW1.Value + rngW2.Value = RWert
D.Range("H6").Value = RWert
End Sub
Der compailer nimmt der + Zeichen weg und Meldet ein Fehler
Warum?
Gruß Sergej
Anzeige