Nommer des plages automatiquement

Sofiane Boukecha · 11 Octobre 2018

Bonjour tout le monde,

j'ai classeur avec plusieurs feuilles, pour distinguer ma zone de recherche je dois nommer des plages sur chaque feuille.
Nom de plage 1 = Nom de la feuille active.
référence = B7:AT170

Nom de plage 2 = "Etat_Lin_" & le numéro du mois de la cellule G5 (ex: si le mois en G5= Aout, je veux avoir le Nom de plage 2 = Etat_lin_08)
référence = B6:AT6

NB: je préfère avoir 2 codes séparés pour chaque Nom

merci à vous tous

Robert · 11 Octobre 2018

Bonjour Sofiane, bonjour le forum,

Plage 1 :

VB:

Sub Macro1()
ActiveSheet.Range("B7:AT170").Name = ActiveSheet.Name
End Sub

Plage 2 : Que contient G5 :
- une date ?
- du texte ? Le mois en entier ? le mois abrégé ?
le code si c'est une date :

VB:

Sub Macro2()
ActiveSheet.Range("B6:AT6").Name = "Etat_Lin_" & Format(Month(Range("G5")), "00")
End Sub

Sofiane Boukecha · 11 Octobre 2018

exactement c'est ce que cherche, vos codes fonctionnent très bien. merci beaucoup.
bonne journée

Nommer des plages automatiquement

Sofiane Boukecha

XLDnaute Nouveau

Robert

XLDnaute Barbatruc

Sofiane Boukecha

XLDnaute Nouveau

Discussions similaires

Nommer des plages automatiquement

Sofiane Boukecha

XLDnaute Nouveau

Robert

XLDnaute Barbatruc

Sofiane Boukecha

XLDnaute Nouveau

Discussions similaires

Privacy & Transparency

Privacy & Transparency