Merci de ta réponse, il faudrait que je refasse un fichier similaire car celui que j'ai je ne peux pas le sortir de l'entreprise (confidentiel).
J'essai de faire ça alors.
De plus, je suis novice en programmation, j'aimerai via un bouton formulaire pouvoir générer une nouvelle feuille excel (j'ai réussi à le faire), mais j'aimerai avoir un message :
- si la feuille est bien créée : "feuille créée"
sinon si l'ancienne feuille n'est pas renommée alors en cliquant sur le bouton afin de la générer sa ne le fasse pas et que ça m’écrive une erreur
Mon début de code :
On Error Resume Next
newpage = Sheets("N°Commande").Name
MsgErreurs: MsgBox "Veuillez renommer la feuille par un numéro de commande." & Chr(10) & "Merci."
If Err Then
Sheets("Maquette").Activate
Sheets("Maquette").Copy After:=Sheets(Sheets.Count)
Sheets(Sheets.Count).Visible = True
Sheets(Sheets.Count).Name = "N°Commande"
End If
On Error GoTo MsgErreurs
Sheets("Maquette").Visible = False
Sheets("Librairie").Visible = False
je sais qu'il me manque la boucle mais je ne sais pas encore comment la faire.
merci