24.07.2017, 10:13
Hallo an alle,
ich habe erst vor kurzem mit Excel begonnen und komme bei diesem Problem nicht weiter:
Mein Problem ist in der 11 Zeile (.(output(x) & backerl + 1).ForeColor = vbRed ), denn ich kann das Objekt nicht auf diese Weise ändern. Das Objekt ist ein Label in der UserForm2. Als Fehlermeldung bekomme ich entweder einen Syntaxfehler, oder das das Objekt Schreibgeschützt ist. Ich hoffe Ihr könnt mir helfen und wie gesagt ich habe erst vor ein paar Tagen damit angefangen...
Vielen Dank schon einmal im Voraus,
Freundliche Grüße,
Kevin
ich habe erst vor kurzem mit Excel begonnen und komme bei diesem Problem nicht weiter:
Code:
Dim backerl As Integer
Dim output() As Variant
output = Array("B", "C", "D", "A", "S")
Dim x As Integer
For backerl = 0 To anzahlBackerlTypes - 1
With UserForm2
For x = 0 To 4
.Controls(output(x) & backerl + 1).Caption = backerlInformation(backerl, x)
If backerlInformation(backerl, x) = "-" Then
.(output(x) & backerl + 1).ForeColor = vbRed
End If
Next x
End With
Next backerl
Vielen Dank schon einmal im Voraus,
Freundliche Grüße,
Kevin