Labelbenennung duch For-schleife
Tino
ich möchte durch eine for-schleife dafür sorgen, dass die captions mehrere Labels gleichzeig umbenannt werden. und um das ganze nicht alles einzeln machen zu müssen, hab ich da an eine for-schleife gedacht.
ich habe folgenden code:
leider weiß ich nicht, wo mein Fehler liegt. Könnt ihr mir helfen?
Sub test()
For j = 17 To 27
For k = 39 To 49
For i = 6 To 16
If Label(i).Caption "" Then
Label(j).Caption = "g"
Label(k).Caption = "g"
Else
Label(j).Caption = ""
Label(k).Caption = ""
End If
Next i
Next j
Next j
End Sub
Gruß Tino
Anzeige