Excel
talpa91
Messages postés
753
Statut
Membre
-
moiced59 Messages postés 1161 Statut Membre -
moiced59 Messages postés 1161 Statut Membre -
Bonjour,
j'ai fais un tableau a plusieurs colonnes avec dates,nom montant echeance est il possible qu'ine fonction me dise quand la date d'echeance est passee
merci d'avance
j'ai fais un tableau a plusieurs colonnes avec dates,nom montant echeance est il possible qu'ine fonction me dise quand la date d'echeance est passee
merci d'avance
Configuration: Windows Vista Firefox 3.5.7
A voir également:
- Excel
- Liste déroulante excel - Guide
- Word et excel gratuit - Guide
- Si ou excel - Guide
- Trier un tableau excel - Guide
- Déplacer colonne excel - Guide
5 réponses
je viens de creer un code qui te met la cellule en fin la date en rouge
tu peux mettre le code derriere un bouton ou sur ouverture de la feuille
i = 2
fincal = Worksheets("feuil1").Cells(1, "C").End(xlDown).Row + 1
Do Until i = fincal
Cells(i, 3).Select
If Selection > Now Then
Selection.Font.Color = vbRed
End If
i = i + 1
Loop
je t'explique un peu
i=2 je commence a regarde a la ligne 2 car ligne 1 c l'entete
fincal = Worksheets("feuil1").Cells(1, "C").End(xlDown).Row + 1 la fincal = 1ere ligne vide ds la colonne pour savoir qd arrete
cells(i,3) si ta cellule date est en colonne D tu met 4 si c E tu met 5 ainsi de suite
si besoin hesite pas
a la place de
Selection.Font.Color = vbRed
tu peux mettre
msgbox "La date est dépassé pour la cellule C " & i
tu peux mettre le code derriere un bouton ou sur ouverture de la feuille
i = 2
fincal = Worksheets("feuil1").Cells(1, "C").End(xlDown).Row + 1
Do Until i = fincal
Cells(i, 3).Select
If Selection > Now Then
Selection.Font.Color = vbRed
End If
i = i + 1
Loop
je t'explique un peu
i=2 je commence a regarde a la ligne 2 car ligne 1 c l'entete
fincal = Worksheets("feuil1").Cells(1, "C").End(xlDown).Row + 1 la fincal = 1ere ligne vide ds la colonne pour savoir qd arrete
cells(i,3) si ta cellule date est en colonne D tu met 4 si c E tu met 5 ainsi de suite
si besoin hesite pas
a la place de
Selection.Font.Color = vbRed
tu peux mettre
msgbox "La date est dépassé pour la cellule C " & i
je te remercie beaucoup j'ai pas tout pige mais je vais essayer d'appliquer et je te tient informé encore merci
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question