bonjour
je cherche à mettre d'une couleur différentes les valeurs de mes contrôle dans USF, suivant la valeur choisie dans une listbox.
Voici le code ci-dessous qui ne fonctione pas, et le fichier.
[file name=SALPontarlier_20051019160143.zip size=46069]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SALPontarlier_20051019160143.zip[/file]
je cherche à mettre d'une couleur différentes les valeurs de mes contrôle dans USF, suivant la valeur choisie dans une listbox.
Voici le code ci-dessous qui ne fonctione pas, et le fichier.
Code:
Private Sub CbCadre_Change()
If CbCadre.Value = 'intervention' Then
CbCadre.ForeColor = &H80000008
cbPlongeur.ForeColor = &H80000008
txtDate.ForeColor = &H80000008
cbPosition.ForeColor = &H80000008
cblieux.ForeColor = &H80000008
txtImmersion.ForeColor = &H80000008
txtSortie.ForeColor = &H80000008
txtTemps.ForeColor = &H80000008
cbProfondeur.ForeColor = &H80000008
End If
End Sub