Wert in Label als Zahl weitergeben
30.12.2020 21:02:02
Eberhard
Ich denke, ich suche einfach zu weit! Möchte einen Wert (Also eine Zahl z.B. "12") von einem Label in eine Zelle schreiben.
Dies funktioniert auch. Leider kommt aber die Fehlermeldung: Typen unverträglich!
Hier mein Code:
Private Sub CommandButton3_Click()
Dim i As Byte
With Worksheets(1)
For i = 20 To 25
Cells(i - 14, 18) = UserForm1.Controls("Label" & i) * 1
Next
End With
End Sub
Besten Dank für Eure Hilfe.Gruss Daniel