bonsoir;
peux-tu m'expliquer pourquoi je n'arrive pas à récupérer la cellule A5 dans une variable Name et la cellule A2 dans une variable size:
j'ai utilisé Range et celles et ça ne marche pas.
Merci pour l'aide
Cordialement

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
For x = Range("A65536").End(xlUp).Row To 1 Step -1
If Range("A" & x) = "A" Then
         Range("B" & x & ":B" & x & "").Select
         Selection.NumberFormat = "0"
         With Selection.Font
         Name = Cells(1, 5)                    ' cette ligne récupère la cellule A5
        .FontStyle = "Normal"
         Size = Cells(1, 2)                      ' cette ligne récupère la cellule A2
        .Strikethrough = False
        .Superscript = False
        .Subscript = False
        .OutlineFont = False
        .Shadow = False
        .Underline = xlUnderlineStyleNone
        .ThemeColor = xlThemeColorLight1
        .TintAndShade = 0
        .ThemeFont = xlThemeFontNone
         End With
Next x