Bonjour,
J'ai un PB bloquant peut-=EAtre pourriez vous le r=E9soudre ?
Avec les lignes qui vont suivre je d=E9clare une valeur en=20
fonction de la bordure, de sa couleur et de son =E9paisseur.
Je n'arrive pas =E0 imbriquer les conditions et =E0 avoir les=20
valeurs exactes. J'ai essay=E9 IF et ElseIf mais ca me=20
renvoi toujours la premi=E8re valeur.
Je vous indique mes trois premi=E8res lignes :
If i.Borders(6).Weight =3D 2 And i.Borders(6).LineStyle =3D=20
xlContinuous And i.Borders(6).Color =3D RGB(255,0,0) Then
ic =3D 0,25
2=E8me ligne m=EAme chose mais avec Weight =3D 3
3=E8me ligne m=EAme chose mais sans Weight et avec LineStyle =3D=20
xlDouble.
La seule chose qui fonctionne pour les deux premi=E8res=20
lignes seulement est If et Else.
J'ai en tout 35 lignes =E0 imbriquer.
Merci de me r=E9pondre
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Eric
Bonsoir,
Essaies de resoudre ton problème avec "select Case" plutôt que des If imbriqués, ce sera je pense plus facile à aborder..
Bon courage Eric
"direct83" a écrit dans le message de news: 026101c34641$8205c2a0$ Bonjour, J'ai un PB bloquant peut-être pourriez vous le résoudre ? Avec les lignes qui vont suivre je déclare une valeur en fonction de la bordure, de sa couleur et de son épaisseur. Je n'arrive pas à imbriquer les conditions et à avoir les valeurs exactes. J'ai essayé IF et ElseIf mais ca me renvoi toujours la première valeur. Je vous indique mes trois premières lignes : If i.Borders(6).Weight = 2 And i.Borders(6).LineStyle xlContinuous And i.Borders(6).Color = RGB(255,0,0) Then ic = 0,25 2ème ligne même chose mais avec Weight = 3 3ème ligne même chose mais sans Weight et avec LineStyle xlDouble. La seule chose qui fonctionne pour les deux premières lignes seulement est If et Else. J'ai en tout 35 lignes à imbriquer. Merci de me répondre
Bonsoir,
Essaies de resoudre ton problème avec "select Case" plutôt que des If
imbriqués, ce sera je pense plus facile à aborder..
Bon courage
Eric
"direct83" <direct83@aol.com> a écrit dans le message de news:
026101c34641$8205c2a0$a301280a@phx.gbl...
Bonjour,
J'ai un PB bloquant peut-être pourriez vous le résoudre ?
Avec les lignes qui vont suivre je déclare une valeur en
fonction de la bordure, de sa couleur et de son épaisseur.
Je n'arrive pas à imbriquer les conditions et à avoir les
valeurs exactes. J'ai essayé IF et ElseIf mais ca me
renvoi toujours la première valeur.
Je vous indique mes trois premières lignes :
If i.Borders(6).Weight = 2 And i.Borders(6).LineStyle xlContinuous And i.Borders(6).Color = RGB(255,0,0) Then
ic = 0,25
2ème ligne même chose mais avec Weight = 3
3ème ligne même chose mais sans Weight et avec LineStyle xlDouble.
La seule chose qui fonctionne pour les deux premières
lignes seulement est If et Else.
J'ai en tout 35 lignes à imbriquer.
Merci de me répondre
Essaies de resoudre ton problème avec "select Case" plutôt que des If imbriqués, ce sera je pense plus facile à aborder..
Bon courage Eric
"direct83" a écrit dans le message de news: 026101c34641$8205c2a0$ Bonjour, J'ai un PB bloquant peut-être pourriez vous le résoudre ? Avec les lignes qui vont suivre je déclare une valeur en fonction de la bordure, de sa couleur et de son épaisseur. Je n'arrive pas à imbriquer les conditions et à avoir les valeurs exactes. J'ai essayé IF et ElseIf mais ca me renvoi toujours la première valeur. Je vous indique mes trois premières lignes : If i.Borders(6).Weight = 2 And i.Borders(6).LineStyle xlContinuous And i.Borders(6).Color = RGB(255,0,0) Then ic = 0,25 2ème ligne même chose mais avec Weight = 3 3ème ligne même chose mais sans Weight et avec LineStyle xlDouble. La seule chose qui fonctionne pour les deux premières lignes seulement est If et Else. J'ai en tout 35 lignes à imbriquer. Merci de me répondre
