Bonjour,
je souhaite écrire une ligne de code qui doit respecter les conditions suivantes:
- écrire à la première ligne vide
- modifier une valeur écrite automatiquement par une couleur définie
je m'explique.
j'ai un tableau comportant 6 colonnes (accès, login, mot de passe, date, heure, commentaires).
lors d'une écriture automatique d'une ligne je souhaite dans un cas normale ne rien faire et dans d'autre (seulement à l'ouverture et fermeture d'un accès), changer la couleur de la cellule appartenant a la colonne "commentaires".
écrire dans la première ligne vide, ça je sais faire. Mais dire q'un bout doit ou non changer de couleur. je bloque.
'écrire dans l'historique
i = 2
While Feuil9.Cells(i, 1).Value <> ""
i = i + 1
Wend
Feuil9.Cells(i, 1).Value = "Read/Write/DataWriting" 'Access
Feuil9.Cells(i, 2).Value = Feuil6.Range("C2") 'Login administrator
Feuil9.Cells(i, 3).Value = Feuil6.Range("D2") 'PassWord
Feuil9.Cells(i, 4).FormulaR1C1 = DateValue(Date) 'Date
Feuil9.Cells(i, 5).FormulaR1C1 = TimeValue(Time) 'Time
Feuil9.Cells(i, 6).Value = "Open Cession" 'Data Comments
'Feuil9.Cells(i, 6).ColorIndex = 3 'cell red color
'Feuil9.Cells(i, 6).ColorIndex = 4 'cell green color
Feuil6.Range("E2").Value = Feuil6.Range("E2") + 1 'incrementation each login
Feuil6.Range("F2").Value = DateValue(Date) 'Date of the last connection
Feuil6.Range("G2").Value = TimeValue(Time) 'Time of the last connection
la ligne de commande précédente fonctionne SAUF la couleur. un peu d'aide s'il vous plait.