Hallo zusammen,
ich habe vier Labels mit Zahlen (Text).
Ich möchte diese addiern und in einem anderen Label ausgeben.
Ich erhalte nur den Wert des letzten Labels...
Wo liegt der fehler?
Dim erg As Double, labind2 As Long
For labind2 = 37 To 40
erg = CDbl(Me.Controls("Label" & labind2))
Label41.Caption = WorksheetFunction.Sum(erg)
Next