Discussion :

[ashpo4]

Bonjour,
Je cherche a ecrire quelque chose en vba, J'ai mon tableau et dans une autre feuille je voudrais faire en sorte qu'il m'ecrive le nom et la ligne ou la date du jour >= a ma Date Limite (colonne D) ET que ma ligne ne soit pas colorié puis je met ma condition.
J'ai déjà parcouru et lu beaucoup de pages mais etant novice ce n'est pas facile.
Dans un premier temp je cherche a comprendre pour la couleur que dois je lui dire si ma ligne n'est pas colorié?

voici le début de mon code, je sais qu'il y'a des fautes, ne me jugez pas aidez moi svp

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
'Sub est le debut de la procedure
Sub Rappel()
'Dim est une variable
Dim Onglet As Worksheet
Dim DateJour, DateLimite
Dim Ligne, Couleur
 
'DateJour = A la date du systeme
DateJour = "28/02/2019"
DateLimite = Range("D8").Value
Ligne = Rows(5)
Couleur = Cells.Interior.Color
 
 
'For Each Onglet In Worksheets
'Couleur = 0 = vrai
If DateJour >= DateLimite And Couleur = False Then
    MsgBox "Vrai"
Else
    MsgBox "Faux"
End If
'Next
End Sub