OVH Cloud OVH Cloud

[Name]Feuil1

6 réponses
Avatar
Youky
Bonjour tous,
Ma Feuil1 a été renommée "Prix"
Je souhaite retrouver le nom de la page selectionnée
mais pas comme ceci :
If Activesheets.Name="Prix" Then blabla
mais en l'appelant par Feuil1 [Name] au haut des propriétées
qui ne varie pas, même en changeant le nom de l'onglet
Sheets(1) ne conviens pas non plus, si les pages sont déplacées
Je ne souhaite pas non plus protéger le classeur.
Mes recherches n'ont pas fonctionnées
Youky

6 réponses

Avatar
JLuc
*Bonjour Youky*,
If ActiveSheet.CodeName = "Feuil1" Then
Devrait convenir

Bonjour tous,
Ma Feuil1 a été renommée "Prix"
Je souhaite retrouver le nom de la page selectionnée
mais pas comme ceci :
If Activesheets.Name="Prix" Then blabla
mais en l'appelant par Feuil1 [Name] au haut des propriétées
qui ne varie pas, même en changeant le nom de l'onglet
Sheets(1) ne conviens pas non plus, si les pages sont déplacées
Je ne souhaite pas non plus protéger le classeur.
Mes recherches n'ont pas fonctionnées
Youky


--
____
( O | O )
--
_oooO_ JLuc _Oooo_

O-O

Avatar
AV
Si je comprends bien, tu veux obtenir le CodeName de l'onglet nommé "Prix" ?

MsgBox Sheets("Prix").CodeName

AV
Avatar
ABED HADDOU
Bonjour "Youky"
affiche la fenêtre des propriétés de la feuille et repmplacé le non Feuil1
par Prix aprés tu poura gérer les methodes et les propriétés de la feuille
par le nouveau nom ex : Prix.Range[A2] ou Prix.Select ect.....!

Cordialement.
Abed_H



Bonjour tous,
Ma Feuil1 a été renommée "Prix"
Je souhaite retrouver le nom de la page selectionnée
mais pas comme ceci :
If Activesheets.Name="Prix" Then blabla
mais en l'appelant par Feuil1 [Name] au haut des propriétées
qui ne varie pas, même en changeant le nom de l'onglet
Sheets(1) ne conviens pas non plus, si les pages sont déplacées
Je ne souhaite pas non plus protéger le classeur.
Mes recherches n'ont pas fonctionnées
Youky





Avatar
Youky
Hé-hé je savais que je passais à coté, maintenant c'est gravé
Merçi JLuc et également à AV grand maitre incontesté.
Youky
"AV" a écrit dans le message de news:

Si je comprends bien, tu veux obtenir le CodeName de l'onglet nommé "Prix"
?

MsgBox Sheets("Prix").CodeName

AV




Avatar
ABED HADDOU
je m'excuse j'ai pas vu la réponse de AV vraiment grand maitre incontesté.
et peut être j'ai mal compris la question.

Abed_H



Hé-hé je savais que je passais à coté, maintenant c'est gravé
Merçi JLuc et également à AV grand maitre incontesté.
Youky
"AV" a écrit dans le message de news:

Si je comprends bien, tu veux obtenir le CodeName de l'onglet nommé "Prix"
?

MsgBox Sheets("Prix").CodeName

AV









Avatar
Youky
Merci de ton aide Abed,
J'ai viens de recevoir juste avant exactement ce que j'attendais
If ActiveSheet.CodeName = "Feuil1" Then
si l'utilisateur renomme la feuille .......
là je plante..........If ActiveSheet.Name = "Prix" Then
Alors le codeName est plus fiable
Bien sur que je peux remplacer le codename par "prix"
Youky
"ABED HADDOU" a écrit dans le message
de news:
Bonjour "Youky"
affiche la fenêtre des propriétés de la feuille et repmplacé le non
Feuil1
par Prix aprés tu poura gérer les methodes et les propriétés de la feuille
par le nouveau nom ex : Prix.Range[A2] ou Prix.Select ect.....!

Cordialement.
Abed_H



Bonjour tous,
Ma Feuil1 a été renommée "Prix"
Je souhaite retrouver le nom de la page selectionnée
mais pas comme ceci :
If Activesheets.Name="Prix" Then blabla
mais en l'appelant par Feuil1 [Name] au haut des propriétées
qui ne varie pas, même en changeant le nom de l'onglet
Sheets(1) ne conviens pas non plus, si les pages sont déplacées
Je ne souhaite pas non plus protéger le classeur.
Mes recherches n'ont pas fonctionnées
Youky