Dennnisss
XLDnaute Occasionnel
bonjour a tous
J'ai un code qui change la couleur de l'ecriture dans un label mais le contaire est-ce qu'il se peut soit changer la couleur dans la boite du label
dans ce code le fore change la couleur de l'ecriture le mais en gras et le souligne, alors change la couleur de fond quel est ce code
merci de votre aide
a + dennnisss😉 😉
If .Cells(Jj + Offset, Colonne).Value = "Reg" Then
Controls("Label" & CStr(Ii)).ForeColor = 0
Controls("Label" & CStr(Ii)).Font.Underline = False
Controls("Label" & CStr(Ii)).FontBold = True
Controls("Label" & CStr(Ii) - 17).ForeColor = 0
Controls("Label" & CStr(Ii) - 17).Font.Underline = False
Controls("Label" & CStr(Ii) - 17).FontBold = True
Controls("Label" & CStr(Ii) + 15).ForeColor = 0
Controls("Label" & CStr(Ii) + 15).Font.Underline = False
Controls("Label" & CStr(Ii) + 15).FontBold = True
J'ai un code qui change la couleur de l'ecriture dans un label mais le contaire est-ce qu'il se peut soit changer la couleur dans la boite du label
dans ce code le fore change la couleur de l'ecriture le mais en gras et le souligne, alors change la couleur de fond quel est ce code
merci de votre aide
a + dennnisss😉 😉
If .Cells(Jj + Offset, Colonne).Value = "Reg" Then
Controls("Label" & CStr(Ii)).ForeColor = 0
Controls("Label" & CStr(Ii)).Font.Underline = False
Controls("Label" & CStr(Ii)).FontBold = True
Controls("Label" & CStr(Ii) - 17).ForeColor = 0
Controls("Label" & CStr(Ii) - 17).Font.Underline = False
Controls("Label" & CStr(Ii) - 17).FontBold = True
Controls("Label" & CStr(Ii) + 15).ForeColor = 0
Controls("Label" & CStr(Ii) + 15).Font.Underline = False
Controls("Label" & CStr(Ii) + 15).FontBold = True