XL 2016 Taille de police

KTM à dit:

Je voudrais mettre la taille de police de plage à 12 mais mon code ci dessous ne marche pas. il renvoie une erreur
Aidez moi à trouver la bonne syntaxe MERCI

Sub Macro1()
Range("A2:M" & Sheets("Grille_de_Dispensation").Range("A" & Rows.Count).End(xlUp).Row).Font.Size = 12
End Sub

Cliquez pour agrandir...

patricktoulon à dit:

bonjour

VB:

Sub Macro1()
with Sheets("Grille_de_Dispensation"): .Range("A2:M" & .cells(rows.count,"A").End(xlUp).row).Font.Size = 12:end with
End Sub

Cliquez pour agrandir...

patricktoulon à dit:

re
et non!! ta version ne fonctionne pas correctement
un range composé doit toujours etre précédé du parent
avec ta version si le sheets"Grille_de_Dispensation" n'est pas actif ca va cafouiller

Cliquez pour agrandir...