Création d'une feuille via VBA

[Yoann118]

Bonjour,
Je viens de m'inscrire et espère poster au bon endroit 🙂
info : je n'utilise que rarement VBA

Je souhaite créer à partir d'une feuille Excel "modèle" via VBA (je ne voit pas comment faire autrement...)
une nouvelle feuille qui se placerait automatiquement à la fin de mon classeur mais dont je garderai la main pour la saisie du nom.
J'ai commencé en fouillant un peu partout à saisir ce code mais ça ne marche pas 🙁

Private Sub CommandButton1_Click()
Dim ongl As String
Dim newfeuille As Worksheet
ongl = InputBox("Saisir le nom de l'onglet.")
Set newfeuille = Sheets("Modèle").Copy(After:=Sheets(ThisWorkbook.Sheets.Count))
newfeuille.Name = ongl
End Sub

Merci pour votre aide.

 

[Gardien de phare]

Re : Création d'une feuille via VBA

Bonjour,

Un exemple de syntaxe

Sub toto()
Dim ongl As String
ongl = InputBox("Saisir le nom de l'onglet.")
Sheets("Feuil1").Copy After:=Sheets(ThisWorkbook.Sheets.Count)
Sheets(ThisWorkbook.Sheets.Count).Name = ongl
End Sub

 

[Yoann118]

Re : Création d'une feuille via VBA

Merci pour ta réponse qui marche très bien.

 

[Staple1600]

Re : Création d'une feuille via VBA

Bonjour à tous

Je souhaite créer à partir d'une feuille Excel "modèle" via VBA (je ne voit pas comment faire autrement...)

Tout simplement clic-droit sur l'onglet Modèle
-> Choisir alors : Déplacer ou copier , cocher [x] Créer une copie et sélectionner: en dernier
et enfin cliquer sur OK
Il y aura juste pour finir à renommer cette copie toute fraîche. 😉

 

[Yoann118]

Re : Création d'une feuille via VBA

Oui bien sûr mais c'est quand même plus simple quand tu cliques juste sur un bouton 🙂