anthoYS
XLDnaute Barbatruc
Bonjour,
Je n'arrive pas à déchiffrer ce code (une personne m'a aidé sans m'expliquer sauf erreur, je ne retombe plus sur le fil, car il me semble avoir relancer sans résultat...), si quelqu'un pouvait me l'expliquer ici (ou sur le fil concerné s'il le retrouve et me joindre l'URL ici)...
Pourquoi il y a 15 et 45 ? Est-ce le code couleur ?
A quoi correspond -4142 ?
Merci par avance
à+
Je n'arrive pas à déchiffrer ce code (une personne m'a aidé sans m'expliquer sauf erreur, je ne retombe plus sur le fil, car il me semble avoir relancer sans résultat...), si quelqu'un pouvait me l'expliquer ici (ou sur le fil concerné s'il le retrouve et me joindre l'URL ici)...
VB:
Cells(R.Row, 1).Resize(, 10).Interior.ColorIndex = -4142
Select Case R.Column
Case 5: Cells(R.Row, 5) = Date
Case 10
R = IIf(R = "þ", "o", "þ")
Cells(R.Row, 1).Resize(, 9).Interior.ColorIndex = IIf(R = "þ", 15, -4142)
Case 9
R = IIf(Not R.Value = "þ", "þ", "o")
Cells(R.Row, 1).Resize(, 8).Interior.ColorIndex = IIf(R = "þ", 45, -4142)
End Select
Pourquoi il y a 15 et 45 ? Est-ce le code couleur ?
A quoi correspond -4142 ?
Merci par avance
à+