Witam
Dzięki bardzo za pomoc. Po ciężkich próbach zrobiłem to tak w pętli For, też działa
Zależało mi na tym żeby te same Labele zmieniały kolor w zależności od ilości
Np. dla czerwonego 10 dla zielonego 20 a dla żółtego 100 razem 130 labeli
w tym sposobie zmieniam tylko zmienną.
Myslę, że to jest dobrze, ale dostosuję się do uwag, jak już dawno wspominałem jestem początkującym w VBA
For i = 0 To pin ' tu wstawiam kolejną zmienną
With pole.Controls(i)
.BackColor = vbGreen
.Caption = pin
End With
Next i
For z = 1 To 2 ' tu wstawiam kolejną zmienną
With pole.Controls(z)
.BackColor = vbRed
.Caption = 2
End With
Next z
For x = 2 To 2 ' tu wstawiam kolejną zmienną
With pole.Controls(x)
.BackColor = vbYellow
.Caption = 3
End With
Next x |