Hallo Allerseits,
ich habe ein Anfänger-Problem. Ich möchte das mehrere Zahlen in den Spalten A und B miteinander multipliziert werden und das Ergebnis in der C Spalte angezeigt wird. Ich schätze das es irgentwas mit der Hierachie am Schluss zu tun hat.
Private Sub vbbutton_Click()
Dim a, b As Double
Dim i As Long
Do Until i = 1
a = Cells(i, 1)
b = Cells(i, 2)
If a = Empty And b = Empty Then
Else
Cells(i, 3) = a * b
i = i + 1
End If
Next
Loop
End Sub
|