Hello,
Je souhaiterais avoir un exemple de mise en forme de format pour divers cas :
J' ai créé (avec l'aide de Fring) un userform qui tourne impec, maintenat je souhaiterais l'améliorer, ou plus exactement mettre en forme les données qui apparaitrons dans mon tableau.
Plusieurs choses :
1°) Je voudrais que lorsque je sélectionne oui cela me l'écrive en vert et en gras.
2°) Je souhaiterais que mes dates du contrôle DTPicker s'écrivent sous le format jours(en chiffre) mois(en tout lettre) année(4 chiffres)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 For i = 1 To 11 If Me.Controls("A" & i & "_O") Then Cells(DerL, 10 + i) = "OUI" Else Cells(DerL, 10 + i) = "NON" End If
3°) En fonction de la date du DTPicker je souhaiterais que ma ligne soit coloré d'une certaine couleur (en fait 3 ou 4 couleurs) si la date du DTPicker2 est > à15 jours de la date du jour en bleu ciel, si la date du DTPicker2 est comprise entre +15 et -15 jours par rapport à la date du jour en jaune si la date du DTPicker est dépassé de plus de 15 jours en orange
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2 Cells(DerL, 2) = DTPicker1.Value Cells(DerL, 3) = DTPicker2.Value
Partager