Bonjour,

Je suis en plein apprentissage de VBA ( et d'excel aussi) et j'avoue avoir quelques soucis avec l'une de mes macros, je vous explique: je doit manipuler un tableau, et suivant le contenu d'une cellule (la N3 pour ne pas la nommer) j'aimerais bien colorier l'ensemble de la ligne du tableau : en vert si la cellule ne contient rien et en orange si elle contient quelque chose (du texte ndlr)... donc j'ai commencé à faire une petite macro mais lorsque je l'execute ça me marque " erreur else sans if", j'ai beau avoir cherché d’où provenait cette erreur mais je ne trouve pas..O_o'
donc voila, les questions que je me poses sont donc : -est-ce que la macro vous semble correcte pour ce que j'ai envie de faire? (or not to be)
- et pourquoi cette @'#*?! de boite de dialogue me dit qu'il ya un problème avec else et if ?

Merci d'avance pour vos reponses
je vous joint ma macro...

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
24
25
26
27
28
29
30
31
32
33
Sub macro_test()
 
Dim i As Integer
i = ActiveSheet.UsedRange.Rows.Count   'calcul  ligne du tableau
 
For i = 3 To i 'boucle se repete a chaque ligne du fichier
 
    If Cells("i,14") = "" Then
    Rows("i").Select
 
    With Selection.Interior
        .Pattern = xlSolid
        .PatternThemeColor = xlThemeColorAccent1
        .Color = 5296274
        .TintAndShade = 0
        .PatternTintAndShade = 0.799981688894314
 
 
   Else
    Rows("i").Select
 
    With Selection.Interior
        .Pattern = xlSolid
        .PatternThemeColor = xlThemeColorAccent1
        .Color = 49407
        .TintAndShade = 0
        .PatternTintAndShade = 0.799981688894314
        End If
 
    Next
 
 
End Sub