Voici mon code qui n'a pas fonctionné. Comment on fait alors?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
 
    Dim m%, n%
    m = 5
    n = 3
    Rows("m+n:m+n").Select    '<------ erreur
    With Selection.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .ThemeColor = xlThemeColorAccent3
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
Merci d'avance