Contenu récent par AJIGO
-
A
Erreur d'exécution '13': Incompatibilité de type
Bonjour, Mon boucle ne fonctionne pas. Je ne sais pas d'où vient le problème Dim i As Long For i = 2 To Cells(Rows.Count, "A").End(xlUp).Row If Not IsEmpty(Cells(i, "F")) Then If Cells(i, "K") > 0 And Cells(i, "K") < 1000 And Year(Cells(i, "F")) < (Year(Now) - 1) Then Cells(i, "I")...- AJIGO
- Discussion
- Réponses: 1
- Forum: Forum Excel
-
A
Problème Macro Dates
La dernière ligne est de 489. Dans la colonne "F" il y a des dates au format jj/mm/aaaa. Il me faut un boucle qui permet : Si Cells(i,"K") compris entre 0 et 1000, et Année de F< L'année dernière alors Cells(i, "I")="Problème"- AJIGO
- Message #6
- Forum: Forum Excel
-
A
Problème Macro Dates
Bonjour, Je ne comprends pas pourquoi mon boucle ne se lance pas. For i = 156 To Cells(Rows.Count, "B").End(xlUp).Row If ((Cells(i, "K").Value > 0) And (Cells(i, "K").Value < 1000)) And _ Format(Cells(i, "F").Value, "yyyy") < (Year(Now) - 1) Then Cells(i, "I").Value = "PROBLEME" ElseIf...- AJIGO
- Discussion
- Réponses: 6
- Forum: Forum Excel