bonsoir,
j'en appelle à vous car j'ai besoin d'aide.
Sans utiliser les MFC je souhaiterai mettre une ligne en couleur dés la saisie dans un usf d'une donnée.
J'ai trouvé des choses qui marchent mais qui ralentissent le systéme en faisant une lecture de l'ensemble du dossier comme ceci:
For Each coul In Range('CP2:CP' & Range('CP65536').End(xlUp).Row) 'colonne à adapter
If coul.Value = 'Définitif' Then
coul.entirerow.colorindex=2
maintenant je voudari limiter à une seule ligne la lecture et la mise en forme,
merci
j'en appelle à vous car j'ai besoin d'aide.
Sans utiliser les MFC je souhaiterai mettre une ligne en couleur dés la saisie dans un usf d'une donnée.
J'ai trouvé des choses qui marchent mais qui ralentissent le systéme en faisant une lecture de l'ensemble du dossier comme ceci:
For Each coul In Range('CP2:CP' & Range('CP65536').End(xlUp).Row) 'colonne à adapter
If coul.Value = 'Définitif' Then
coul.entirerow.colorindex=2
maintenant je voudari limiter à une seule ligne la lecture et la mise en forme,
merci