affecter un nom au une selection de cellule(macro)

[David]

Bonjour à toutes et à tous.

Est il possible d'affecter par macro un nom pour une selection de cellule.

Par exemple on selectionne les cellules
A1 à G15 et on lui affecte le nom de BDD_CELLULES.

Merci pour votre aide


David

 

[JC de Lorient]

salut David, re le forum

avec ce code
tu sélectionnes tes cellules
tu lances la macro

Sub nommercel()
Dim x
With Selection
x = InputBox('quel nom')
ActiveWorkbook.Names.Add Name:=x, RefersToR1C1:='=Feuil1!R1C3:R21C3'
End With
End Sub


JC

 

[JC de Lorient]

re

a mon avis ça va planter
ai fé une erreur
désolé

JC

 

[JC de Lorient]

re

essaye plutot ça :

Sub nommercel()
Dim x
With Selection
x = InputBox('quel nom')
ActiveWorkbook.Names.Add Name:=x, RefersToR1C1:=Selection
End With
End Sub


JC

 

[Bricofire]

Bonjour David, JC de Lorient

Quelques fois plus simple que de passer par la méthode Add, on peut employer direct la propriété Name de l'objet Range du genre :

sur ta feuille tu as sélectionné : I7:L26

Selection.Name= 'David'
Range('C5:F26').Name = 'JC'


Bonne journée

Brico