Nommer une plage de cellules

Comment faire pour attribuer un nom à une plage de cellules ?

Méthode de base : Sélectionne la plage en question puis menu insertion/nom/définir, entre le nom et ensuite tu peux te référer à cette plage par son nom dans tes formules.
Sur Excel 2007, tu vas dans l'onglet formules/Noms définis/définir un nom.

Maintenant si cette plage de cellules est appellée à varier, regarde du côté de la fonction décaler.
Pour faciliter la saisie du nom, tu peux aussi, à gauche de la barre de formule, là ou normalement tu vois l'adresse de ta cellule entrer le nom que tu veux pour la plage sélectionnée. Quand tu passes la souris sur cette barre tu vois d'ailleurs écrit "zone de nom". Entre le nom et valide avec retour
. Attention, l'utilisation de cette zone n'est pas des plus évidentes ensuite pour supprimer/modifier les noms ou les références. En cas de pb repasse par le menu. Tu peux d'ailleurs aussi donner un nom à des graphiques de cette manière.
Pour cela attention, il ne faut pas cliquer sur le graphe pour le sélectionner mais aller dans édition/atteindre/cellules/objets et ensuite utiliser la touche tab pour sélectionner l'objet (graphe) de ton choix.
Si c'est par VBA : ActiveWorkbook.Names.Add Name:="PLAGE1",RefersToR1C1:="=Feuil1!R1C10:R5C10"
Si tu es amené à nommer fréquemment des cellules tu peux utiliser cette macro de Frédéric qui permet d'aller directement dans le menu insertion/nom/définir sur un clic droit de souris : Avec ça tu sélectionnes ta plage à nommer, clic droit, "Définir un nom..." et la boite de dialogue s'affiche directement :

 'dans un nouveau classeur à enregistrer en .xla
 'dans le module ThisWorkbook : 
Private sub
 Workbook_AddinInstall()
 CmdNommer
 end sub
Private sub
 Workbook_AddinUninstall()
 DelNommer
 end sub
 'dans un module standard 
Public Const 
Nommer = "Définir un nom..."  
sub CmdNommer()
 Dim cBar As CommandBar,
 Ctrl As CommandBarButton
 
 Set cBar = Application.CommandBars("Cell")
 Set Ctrl = cBar.Controls.Add(msoControlButton, ID:\=878, before:=1)
 With Ctrl
 .Caption = Nommer
  .FaceId = 1838
  .Style = msoButtonIconAndCaption
 
 End With
 end sub
sub DelNommer()
 On Error Resume Next
 Application.CommandBars("Cell").Controls(Nommer).Delete
 end sub

n'oublions pas la très pratique "définition collective de noms" par *Insertion Nom Créer* (raccourci CTRL MAJ F3) qui permet de définir d'un coup toutes les colonnes et/ou les lignes d'un tableau en s'appuyant sur les étiquettes de lignes et/ou de colonnes dudit tableau.

Auteurs : , , ,

Mots clefs associés à cette page : , , , ,