vbamania.pl
login:
hasło:
 
  *Rejestracja *Zapomniane hasło
 Dziś jest poniedziałek, 13 maja 2024 roku.
Ustaw jako stronę startową Ulubione Napisz
PowrótPowrót do serwisu  RegulaminRegulamin rssRSS

  tytuł wątku:
Wątki dyskusji

With Label1


otwartyotwarty rozpoczął: Blaszka_P postów: 3



napisał: Blaszka_P
postów: 112


umieszczony:
3 maja 2011
18:02

  
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' tu wstawiam kolejną zmienną
    With pole.Controls(z)
    .BackColor = vbRed
    .Caption = 2
    End With
     
     Next z
     
      For x = 2 To' tu wstawiam kolejną zmienną
    With pole.Controls(x)
    .BackColor = vbYellow
    .Caption = 3
    End With
     
     Next x

napisał: Trebor
postów: 1209


umieszczony:
3 maja 2011
07:00

  
Czy chodzi o coś w stylu
Controls("Label" & nr).BackColor = nr * 10000

napisał: Blaszka_P
postów: 112


umieszczony:
2 maja 2011
11:14

  
Witam

Chciałbym aby wartość Label1 była zależna od zmiennej np. nr
nr. to liczba od 1 do 200

Chciałbym aby kolor zmieniał się dla odpowiedniego Labela w zależności od zmiennej nr

Label = "Label" & nr
    With Label
    .BackColor = vbGreen
    
    End With

mam coś takiego ale to nie działa

Za pomoc dziękuję


<-wstecz  1  dalej->
wszystkich stron: 1


Sortuj posty: z