OVH Cloud OVH Cloud

Création de nom

4 réponses
Avatar
DéGé
Création de nom par programme.

Range'"base_de_données).CreateNames Top:=True, Left:=False, Bottom:=False,
Right:= _
False

Y a t-il un moyen d'éviter l'affichage des boîtes de dialogue
de confirmation de changement du nom ?

D'avance merci

DéGé

4 réponses

Avatar
MichDenis
Bonjour Dégé,

Voici une copie de l'aide,

Voici un exemple qui crée des PlageNommées à partir des étiquettes de colonne de la première ligne de la plage de
cellules et , elle crée aussi des PlageNommées à partir des étiquettes de la première colonnes de la plage.

With Worksheets("feuil1").Range("A1:B3")
.CreateNames Left:=True, Top:=True
End With

Je t'invite à consulter l'aide, sur la façon d'utiliser les paramètres ... dont je reproduis ici le texte :

'-----------------------------------------
CreateNames, méthode
Voir aussiS'applique àExempleDétails
Cette méthode crée des noms dans la plage spécifiée en fonction des étiquettes de texte de la feuille.
expression.CreateNames(Top, Left, Bottom, Right)
expression Obligatoire. Expression qui renvoie un objet Range.
Top Argument de type Variant facultatif. Affectez-lui la valeur True pour créer des noms en fonction des étiquettes
de la ligne du haut. La valeur par défaut est False.
Left Argument de type Variant facultatif. Affectez-lui la valeur True pour créer des noms en fonction des
étiquettes de la colonne de gauche. La valeur par défaut est False.
Bottom Argument de type Variant facultatif. Affectez-lui la valeur True pour créer des noms en fonction des
étiquettes de la ligne du bas. La valeur par défaut est False.
Right Argument de type Variant facultatif. Affectez-lui la valeur True pour créer des noms en fonction des
étiquettes de la colonne de droite. La valeur par défaut est False.
Notes
Si vous ne spécifiez pas l'un des arguments Top, Left, Bottom ou Right, Microsoft Excel détermine lui-même la position
des étiquettes de texte en fonction de la forme de la plage spécifiée.
Exemple
Cet exemple montre comment créer des noms pour les cellules B1 à B3 en fonction du texte des cellules A1 à A3. Notez que
vous devez inclure dans la plage les cellules contenant ces noms, même si ces derniers ont été créés uniquement pour les
cellules B1 à B3.

Set rangeToName = Worksheets("Sheet1").Range("A1:B3")
rangeToName.CreateNames Left:=True
'-----------------------------------------


Salutations!
Avatar
DéGé
Merci. Mais ma question est:

Y a t-il un moyen d'éviter l'affichage des boîtes de dialogue
de confirmation de changement du nom du type:

Voulez-vous remplacer la définition existante de Nom ?


"MichDenis" a écrit dans le message de news:
%23$
Bonjour Dégé,

Voici une copie de l'aide,

Voici un exemple qui crée des PlageNommées à partir des étiquettes de
colonne de la première ligne de la plage de
cellules et , elle crée aussi des PlageNommées à partir des étiquettes de
la première colonnes de la plage.

With Worksheets("feuil1").Range("A1:B3")
.CreateNames Left:=True, Top:=True
End With

Je t'invite à consulter l'aide, sur la façon d'utiliser les paramètres ...
dont je reproduis ici le texte :

'-----------------------------------------
CreateNames, méthode
Voir aussiS'applique àExempleDétails
Cette méthode crée des noms dans la plage spécifiée en fonction des
étiquettes de texte de la feuille.
expression.CreateNames(Top, Left, Bottom, Right)
expression Obligatoire. Expression qui renvoie un objet Range.
Top Argument de type Variant facultatif. Affectez-lui la valeur True
pour créer des noms en fonction des étiquettes
de la ligne du haut. La valeur par défaut est False.
Left Argument de type Variant facultatif. Affectez-lui la valeur True
pour créer des noms en fonction des
étiquettes de la colonne de gauche. La valeur par défaut est False.
Bottom Argument de type Variant facultatif. Affectez-lui la valeur
True pour créer des noms en fonction des
étiquettes de la ligne du bas. La valeur par défaut est False.
Right Argument de type Variant facultatif. Affectez-lui la valeur
True pour créer des noms en fonction des
étiquettes de la colonne de droite. La valeur par défaut est False.
Notes
Si vous ne spécifiez pas l'un des arguments Top, Left, Bottom ou Right,
Microsoft Excel détermine lui-même la position
des étiquettes de texte en fonction de la forme de la plage spécifiée.
Exemple
Cet exemple montre comment créer des noms pour les cellules B1 à B3 en
fonction du texte des cellules A1 à A3. Notez que
vous devez inclure dans la plage les cellules contenant ces noms, même si
ces derniers ont été créés uniquement pour les
cellules B1 à B3.

Set rangeToName = Worksheets("Sheet1").Range("A1:B3")
rangeToName.CreateNames Left:=True
'-----------------------------------------


Salutations!




Avatar
MichDenis
Bonjour Dégé,

Application.DisplayAlerts = False


Salutations!


"DéGé" a écrit dans le message de news: 42261f89$0$1207$
Merci. Mais ma question est:

Y a t-il un moyen d'éviter l'affichage des boîtes de dialogue
de confirmation de changement du nom du type:

Voulez-vous remplacer la définition existante de Nom ?


"MichDenis" a écrit dans le message de news:
%23$
Bonjour Dégé,

Voici une copie de l'aide,

Voici un exemple qui crée des PlageNommées à partir des étiquettes de
colonne de la première ligne de la plage de
cellules et , elle crée aussi des PlageNommées à partir des étiquettes de
la première colonnes de la plage.

With Worksheets("feuil1").Range("A1:B3")
.CreateNames Left:=True, Top:=True
End With

Je t'invite à consulter l'aide, sur la façon d'utiliser les paramètres ...
dont je reproduis ici le texte :

'-----------------------------------------
CreateNames, méthode
Voir aussiS'applique àExempleDétails
Cette méthode crée des noms dans la plage spécifiée en fonction des
étiquettes de texte de la feuille.
expression.CreateNames(Top, Left, Bottom, Right)
expression Obligatoire. Expression qui renvoie un objet Range.
Top Argument de type Variant facultatif. Affectez-lui la valeur True
pour créer des noms en fonction des étiquettes
de la ligne du haut. La valeur par défaut est False.
Left Argument de type Variant facultatif. Affectez-lui la valeur True
pour créer des noms en fonction des
étiquettes de la colonne de gauche. La valeur par défaut est False.
Bottom Argument de type Variant facultatif. Affectez-lui la valeur
True pour créer des noms en fonction des
étiquettes de la ligne du bas. La valeur par défaut est False.
Right Argument de type Variant facultatif. Affectez-lui la valeur
True pour créer des noms en fonction des
étiquettes de la colonne de droite. La valeur par défaut est False.
Notes
Si vous ne spécifiez pas l'un des arguments Top, Left, Bottom ou Right,
Microsoft Excel détermine lui-même la position
des étiquettes de texte en fonction de la forme de la plage spécifiée.
Exemple
Cet exemple montre comment créer des noms pour les cellules B1 à B3 en
fonction du texte des cellules A1 à A3. Notez que
vous devez inclure dans la plage les cellules contenant ces noms, même si
ces derniers ont été créés uniquement pour les
cellules B1 à B3.

Set rangeToName = Worksheets("Sheet1").Range("A1:B3")
rangeToName.CreateNames Left:=True
'-----------------------------------------


Salutations!




Avatar
DéGé
Merci infiniment !

DéGé

"MichDenis" a écrit dans le message de news:
%
Bonjour Dégé,

Application.DisplayAlerts = False


Salutations!


"DéGé" a écrit dans le message de news:
42261f89$0$1207$
Merci. Mais ma question est:

Y a t-il un moyen d'éviter l'affichage des boîtes de dialogue
de confirmation de changement du nom du type:

Voulez-vous remplacer la définition existante de Nom ?


"MichDenis" a écrit dans le message de news:
%23$
Bonjour Dégé,

Voici une copie de l'aide,

Voici un exemple qui crée des PlageNommées à partir des étiquettes de
colonne de la première ligne de la plage de
cellules et , elle crée aussi des PlageNommées à partir des étiquettes de
la première colonnes de la plage.

With Worksheets("feuil1").Range("A1:B3")
.CreateNames Left:=True, Top:=True
End With

Je t'invite à consulter l'aide, sur la façon d'utiliser les paramètres
...
dont je reproduis ici le texte :

'-----------------------------------------
CreateNames, méthode
Voir aussiS'applique àExempleDétails
Cette méthode crée des noms dans la plage spécifiée en fonction des
étiquettes de texte de la feuille.
expression.CreateNames(Top, Left, Bottom, Right)
expression Obligatoire. Expression qui renvoie un objet Range.
Top Argument de type Variant facultatif. Affectez-lui la valeur True
pour créer des noms en fonction des étiquettes
de la ligne du haut. La valeur par défaut est False.
Left Argument de type Variant facultatif. Affectez-lui la valeur
True
pour créer des noms en fonction des
étiquettes de la colonne de gauche. La valeur par défaut est False.
Bottom Argument de type Variant facultatif. Affectez-lui la valeur
True pour créer des noms en fonction des
étiquettes de la ligne du bas. La valeur par défaut est False.
Right Argument de type Variant facultatif. Affectez-lui la valeur
True pour créer des noms en fonction des
étiquettes de la colonne de droite. La valeur par défaut est False.
Notes
Si vous ne spécifiez pas l'un des arguments Top, Left, Bottom ou Right,
Microsoft Excel détermine lui-même la position
des étiquettes de texte en fonction de la forme de la plage spécifiée.
Exemple
Cet exemple montre comment créer des noms pour les cellules B1 à B3 en
fonction du texte des cellules A1 à A3. Notez que
vous devez inclure dans la plage les cellules contenant ces noms, même si
ces derniers ont été créés uniquement pour les
cellules B1 à B3.

Set rangeToName = Worksheets("Sheet1").Range("A1:B3")
rangeToName.CreateNames Left:=True
'-----------------------------------------


Salutations!