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

Renommer onglet

Créer une discussion

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 !

S'inscrire

MASSJIPE

XLDnaute Impliqué
Bonjour
Je cherche à nommer un onglet à partir de la cellule B2
à chaque fois que je crée une nouvelle feuille
J'ai bien trouver ça
ActiveSheet.Name = Range("B2").Value
comment l'intégrer
Merci
Cijoint.fr - Service gratuit de dépôt de fichiers
 
Trier par date Trier par votes
Re : Renommer onglet

Bonjour Massjipe, Gilbert, bonjour le forum,

essaie comme ça :
Code: 
Private Sub CommandButton1_Click()
With Sheets("vierge")
If Not IsDate(TextBox1) Then
Exit Sub
End If
  .Range("b2") = CDate(TextBox1)
  .Range("I2") = CDate(TextBox1)
   Sheets("vierge").Range("E2").Value = Me.ComboBox1.Text
   Sheets("vierge").Range("G2").Value = Me.ComboBox2.Text
   Sheets("vierge").Range("L2").Value = Me.ComboBox3.Text
   Sheets("vierge").Range("N2").Value = Me.ComboBox4.Text
   Sheets("vierge").Range("C1").Value = Me.ComboBox5.Text
   Sheets("vierge").Range("J1").Value = Me.ComboBox6.Text
 
    Unload Me
End With
    Sheets("Vierge").Select
    Sheets("Vierge").Copy Before:=Sheets(2)
  [COLOR=red]  ActiveSheet.Name = ActiveSheet.Range("B2").Text[/COLOR]
    Sheets("Vierge").Select
    Range("B2").Select
    Selection.ClearContents
    Range("C1:G1").Select
    Selection.ClearContents
    Range("E2").Select
    Selection.ClearContents
    Range("G2").Select
    Selection.ClearContents
    Range("I2").Select
    Selection.ClearContents
    Range("J1:N1").Select
    Selection.ClearContents
    Range("L2").Select
    Selection.ClearContents
    Range("N2").Select
    Selection.ClearContents
    Range("A1").Select
End Sub
 
Vote positif 0 Vote négatif
Re : Renommer onglet

Bonjour le fil 🙂,
Attention, B2 contient une date... Je propposerais ceci
Code: 
For Each Feuille In ThisWorkbook.Worksheets
If Feuille.Name = Format(Sheets("Vierge").Range("B2"), "dd-mm-yyyy") Then
MsgBox "Feuille existante !"
Exit Sub
End If
Next
Sheets("Vierge").Copy Before:=Sheets(2)
ActiveSheet.Name = Format(Range("B2"), "dd-mm-yyyy")
Range("B2").ClearContents
Range("C1:G1").ClearContents
Range("E2").ClearContents
Range("G2").ClearContents
Range("I2").ClearContents
Range("J1:N1").ClearContents
Range("L2").ClearContents
Range("N2").ClearContents
Range("A1").Select
Bonne journée 😎
 
Vote positif 0 Vote négatif
Re : Renommer onglet

Bonjour

si le dernier onglet se trouve à la dernière position

Sheets(sheets.count).Select

devrait le faire 😱

sinon dans le cas de ton exemple

la feuille créée sur touve en position 2 donc

Sheets(2).Select doit être la solution
 
Dernière édition:
Vote positif 0 Vote négatif
Re : Renommer onglet

Bonjour Gilbert,
Sheets(2).Select c'est ok
Par contre je voudrais rajouter dans mon userform un bouton pour modifer une feuille à partir des dates d'onglets.
C'est à dire je recherche la date d'aujourd'hui les combobox dans mon userform me donne les données que je peux modifier
merci
 
Vote positif 0 Vote négatif
Re : Renommer onglet


je suppose que le nom des feuilles créées sont comme le proposait JNP des dates
 
Vote positif 0 Vote négatif
Re : Renommer onglet

je pense qu'il faut faire un récapitulatif des feuilles créées afin de pouvoir choisir la feuille à modifier
ensuite cette selection faite il faut que le code rapatrie les données dans l'user
peut-être deleter la feuille et la recréer une fois les modifications faites ou modifier directement ????

bon courage
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

Discussions similaires

S
  • Question Question
XL 2021 Dupliquer un onglet et renommer selon une liste
Réponses
3
Affichages
152
sonskriverez
S
  • Question Question
XL 2019 Faire référence au nom de la feuille active ( ActiveSheet )
2
Réponses
15
Affichages
575
Dranreb
  • Question Question
XL 2021 création d'onglets en masse depuis un modele
Réponses
6
Affichages
324
Phil69970
  • Résolu(e)
XL 2021 demander à l'utilisateur de selectionner un onglet
Réponses
8
Affichages
584
job75
M
  • Résolu(e)
Microsoft 365 Somme d'une donnée spécifique, dans une Colonne spécifique dans chaque Onglet
Réponses
2
Affichages
275
Lolote83
L
J
  • Résolu(e)
Microsoft 365 Valeur cellule dans un macro
2
Réponses
17
Affichages
671
job75
  • Question Question
XL 2019 [VB] Organisation et gestion du ménage et de l'entretien global (à améliorer)... Comment procéder ?
Réponses
13
Affichages
515
anthoYS
  • Résolu(e)
Microsoft 365 rendre visible automatiquement l'onglet de la feuille active sur la barre de navigation inférieure
Réponses
11
Affichages
1 K
Eric 888
F
Fdaga
Réponses
0
Affichages
189
Fdaga
F
  • Question Question
XL 2019 Application.Run
Réponses
3
Affichages
253
Atiom
F
  • Question Question
XL 2016 Fusion 1 onglet de plusieurs fichiers EXCEL
Réponses
1
Affichages
219
chris
N
  • Question Question
Microsoft 365 Excel automatisé pour gestion du temps par projet
Réponses
11
Affichages
519
Dudu2
P
  • Résolu(e)
Microsoft 365 VBA - Survol d'un Label déclenchement action
Réponses
8
Affichages
326
patricko-13
P
X
  • Question Question
XL 2021 Transformation de données sur une ligne en plusieurs lignes
Réponses
9
Affichages
522
xavieralvaro
X
  • Question Question
XL 2019 Gestion de 4 sources de revenu (A, B, C et D). Et rajout du jour en cours et MEFC qui doit varier selon le mois en cours...
Réponses
8
Affichages
258
sylvanu
J
  • Question Question
Microsoft 365 Copie des onglets dans un fichier séparé depuis une liste en VBA
Réponses
3
Affichages
509
job75
D
  • Résolu(e)
Microsoft 365 Filtre avancé VBA multi-critères
Réponses
14
Affichages
894
DELHOMME
D
J
  • Question Question
Microsoft 365 Code VBA
Réponses
10
Affichages
1 K
jebibo
J
  • Question Question
XL 2019 Extraire les valeurs de plusieurs plages identiques de plusieurs feuilles différentes
Réponses
12
Affichages
385
mapomme
T
  • Résolu(e)
XL 2016 Synthese - renvoi d'info sur un onglet
2
Réponses
15
Affichages
1 K
tuti
T
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…