VBA - Probleme mit Range.Value
02.12.2012 12:28:39
JörgS
ich bin absoluter Neuling was VBA angeht und schon beginnen die ersten Schwierigkeiten. Ich zerbreche mir den Kopf, warum klappt es mit einer einzelnen Zelle und warum nicht mit mehreren Zellen. Einfaches Beispiel (Summenbildung):
klappt:
Sub Macro19()
Dim x As Integer
Dim y As Integer
Dim z As Integer
x = Sheets("Tabelle2").Range("A2").Value
y = Sheets("Tabelle2").Range("B2").Value
z = x + y
Sheets("Tabelle2").Range("C2").Value = z
End Sub
klappt nicht:
Sub Macro20()
Dim x As Integer
Dim y As Integer
Dim z As Integer
x = Sheets("Tabelle2").Range("A2:A8").Value
y = Sheets("Tabelle2").Range("B2:B8").Value
z = x + y
Sheets("Tabelle2").Range("C2:C8").Value = z
End Sub