Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

figer le nom de l'onglet vba

  • Initiateur de la discussion Initiateur de la discussion itombof
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

I

itombof

Guest
Bonjour à tous

voila mon code pour changer le nom de l'onglet sport en judi2:
Sheets("sport").Name = "judi2"


par contre le souci c'est qu'en général je ne connais pas le nom de l'onglet original (je veux l'automatiser bien entendu)

j'ai essayé
Sheets("*").Name = "judi2"

mais ça ne donne vraiment pas ce que je veux


quelqu'un peut il m'aider?

merci d'avance
 
Re : figer le nom de l'onglet vba

bonjour itombof

si ton fichier a plusieurs onglets ce n'est pas gagné ( a moins de connaitre sa place )
s'il n'y a qu'une feuille ceci devrait convenir

Code:
 sheets(Sheets.count).name="judi2"

valable egalement pour le dernier onglet

pour le premier

Code:
 sheets(1).name="judi2"
 
Re : figer le nom de l'onglet vba

Bonsoir itombof, PierreJean🙂

peut être une autre solution en utilisant le "codename" de la feuille, dans l'éditeur vba nom figurant dans la fenêtre "project vbaproject", généralement ce dernier n'a pas vocation a être souvent modifié :

Code:
Feuil1.Name = "toto"

bonne soirée
@+
 
Re : figer le nom de l'onglet vba

Bonjour merci encore
je me suis confronté ce matin à un autre type de problème.
ce qu'il y a c'est que mon classeur initiale est updaté quotidiennement par un organisme externe et quand je fais un un workbook_open du fichier original : "" ne sert à rien.
en gros voila mon nouveau code pour essayer de résoudre mon souci:



Sub workbook_open()
MsgBox ("Mise à part le fichier Classement.xls, fermer tous les fichiers excel ouverts!")
Workbooks.Open Filename:="H:\s2i\funds\Global_NAV_Clones.XLS"
Windows(Global_NAV_Clones.XLS).Activate
Dim CLASSEUR As Variant
Dim NOM_FEUILLE As Variant
CLASSEUR = ActiveWorkbook.Name
Windows("Global_NAV_Clones.XLS").Activate

Sheets(1).Name = "judi"

End Sub



problème: Object required (Error 424)
 
Re : figer le nom de l'onglet vba

Re

En 1ere analyse je reduirais a:

Code:
Sub workbook_open()
MsgBox ("Mise à part le fichier Classement.xls, fermer tous les fichiers excel ouverts!")
Workbooks.Open Filename:="H:\s2i\funds\Global_NAV_Clones.XLS" 
ActiveWorkbook.Sheets(1).Name = "judi"
End sub
 
Re : figer le nom de l'onglet vba

Sub workbook_open() 'd'un fichier "clLASSEMENT"

fige_nom_onglet

End sub


merci encore Pierrejean et pierrot

Voila mon code final qui fonctionne :

Sub fige_nom_onglet()

MsgBox ("Mise à part le fichier Classement.xls, fermer tous les fichiers excel ouverts!")
Workbooks.Open Filename:="H:\s2i\funds\Global_NAV_Clones.XLS"
ActiveWorkbook.Sheets(1).Name = "judi"

End Sub




par contre je voudrais savoir au niveau de 10H57, je pense que c'est un problème d'activation de la nouvelle sheet qui doit nécessité une redimension de la plage, mais je dois avouer que je ne vois pas pourquoi j'ai besoin de redimmensionner dans ce cas ci?
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

D
  • Question Question
Réponses
5
Affichages
248
Didierpasdoué
D
Réponses
3
Affichages
877
Réponses
31
Affichages
2 K
Réponses
5
Affichages
609
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…