"Appel" de cellule (nommée) par macro

[Sébastien]

Bonjour le forum


J ai un grand nombre de paramètres, que je stocke dans des feuilles excel et que j utilise dans mes macros, pour me simplifier la programmation j aimerais pouvoir utiliser un nom plutot que de définir une cellule, en plus en cas de décalage ou d insertion de lignes ca ne pose plus de problème!!!

Un petit exemple pour illustrer ma demande :

je stocke un paramètre en A1, je nomme cette cellule 'taux'( avec la fonction INSERTION/NOM/DEFINIR) Comment faire pour 'appeller' taux dans mes macro???

Merci d avance

Sébastien

 

[vekmort]

Bonjour,

Mettre le nom entre guillemets :

Range('Taux') = 1

Bonne soirée,

vekmort :S

 

[AV]

Re:

Ave,

'....cette cellule 'taux'( avec la fonction INSERTION/NOM/DEFINIR) Comment faire pour 'appeller' taux dans mes macro???....'

MsgBox 100 * [taux]
ou encore
[B1]=[B1]*[taux]

AV [MVP Excel]

 

[coco_lapin]

Re: Appel cellule nommée

Bonjour AV et le forum.

Si tu as nommée une cellule 'taux':

Exemple de selection de cette cellule:

Cells(Range('taux').Row,Range('taux').column).Select

 

[AV]

Re: Appel cellule nommée

Ave,

'..Bonjour AV ...Si tu as nommée une cellule 'taux''

Ben, c'est pas moi qui ai posé la question...

'..Exemple de selection de cette cellule:
Cells(Range('taux').Row,Range('taux').column).Select'

Si je puis me permettre...
Cette formulation est particulièrement 'dangereuse' car, en reprenant les coordonnées de la plage 'taux', la sélection ne va concerner QUE la feuille active !

Pour beaucoup plus de sureté, il suffit d'écrire :
Application.Goto Reference:='taux'

AV [MVP Excel]

 

[Sébastien]

Re: Appel cellule nommée

Bonjour le forum

Désolé pour le retard de réponse, un grand merci pour celles ci qui fonctionnent parfaitement.

a+

Sébastien

 

[coco_lapin]

Re: Appel cellule nommée

Bonjour AV et le forum.

AV, dans le cas de plusieurs onglets identiques, des cellules ont le même nom.

Pour, par exemple selectionner une cellule de nom 'taux', dans la feuille 'AV1' il faut faire:

Sheets(AV1).Cells(Range('taux').Row,Range('taux').column).Select