Microsoft 365 Dupliquer un onglet avec demande de valeur

[Nathan027]

Bonjour à toutes et à tous
je vous expose ma demande,
j'ai créer un fichier (que je vais joindre à ma demande)
Dans la feuille "Bilan", j'ai un bouton "Ajouter une nouvelle journée"
Quand je clique dessus, la feuille "Vierge" est dupliquée pour en créer une nouvelle, à ce moment on doit renseigner le nom de la nouvelle feuille.
Jusque là c'est Good
Maintenant ce que j'aimerai c'est que ca me demande également le "N° Pont" qui s'inscrirait dans la cellule D4, mais également le "Compteur horaire qui s'inscrirait dans D5.
j'ai essayé des créer une "Userform" .. C'est surement pas la bonne solution d'ailleurs .. et je sais pas comment faire du coup.
Sauriez vous m'aider ? je vous en remercie d'avance.

 

[sousou]

Bonjour
Et pourquoi pas un userform

 

[piga25]

Bonjour,
en modifiant un peu ton code pour ajouter une feuille

Sub DupliquerOnglet()
' copie la feuille modèle et la renomme
Dim Onglet As Worksheet
Set Onglet = ActiveWorkbook.Sheets("Vierge")
Onglet.Copy After:=Onglet
ActiveSheet.Name = Application.InputBox("Nom de l'onglet, Format JJ.MM.AAAA", Type:=2)
' renseigne les valeurs pont et compteur horraire
Dim Pont As Byte
Dim Compteur As String
Pont = InputBox("Indiquer le n° du pont")
[D4] = Pont
Compteur = InputBox("Indiquer la valeur du compteur horaire")
[D5] = Compteur
End Sub

 

[Nathan027]

Bonjour
Et pourquoi pas un userform

Merci BCP

 

[fanfan38]

Bonjour
Ci joint ma solution

A+ François

 

[Nathan027]

Merci à tous pou vos réponses