Bonjour,
Je souhaiterais savoir comment écrire une grande quantité de plage nommée. J'ai trouvé une piste avec l'enregistreur de macro pour passer à la ligne mais cela ne marche guère.
Le but de la manœuvre est de sélectionner ces plages et de leur attribuer une certaine couleur. Ce morceau de code fais partie d'une série d'action dans un "If"
J'ai volontaire retiré la plupart des plages afin de na pas alourdir l'exemple
Union(Range _
"Partie_04_T01_J,Partie_04_T24_J,Partie_04_T25_J" _
), Range( _
"Partie_09_T01_J,Partie_09_T24_J,Partie_09_T25_J" _
), Range( _
"Partie_12_T01_J,Partie_12_T25_J" _
)).Select
With Selection.Interior
.Pattern = xlLightUp
.PatternColorIndex = xlAutomatic
.Color = 13434879
.TintAndShade = 0
.PatternTintAndShade = 0
End With
En vous remerciant par avance pour votre aide !
Je souhaiterais savoir comment écrire une grande quantité de plage nommée. J'ai trouvé une piste avec l'enregistreur de macro pour passer à la ligne mais cela ne marche guère.
Le but de la manœuvre est de sélectionner ces plages et de leur attribuer une certaine couleur. Ce morceau de code fais partie d'une série d'action dans un "If"
J'ai volontaire retiré la plupart des plages afin de na pas alourdir l'exemple
Union(Range _
"Partie_04_T01_J,Partie_04_T24_J,Partie_04_T25_J" _
), Range( _
"Partie_09_T01_J,Partie_09_T24_J,Partie_09_T25_J" _
), Range( _
"Partie_12_T01_J,Partie_12_T25_J" _
)).Select
With Selection.Interior
.Pattern = xlLightUp
.PatternColorIndex = xlAutomatic
.Color = 13434879
.TintAndShade = 0
.PatternTintAndShade = 0
End With
En vous remerciant par avance pour votre aide !