Bonjour à tous
j'ai un code qui bug en 2007 ce qui n'étais pas le cas en 2003
j'ai le message
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Sub feuille_de_la_semaine() Dim reponse As String Sheets("commande").Copy After:=Sheets(3) reponse = InputBox("nom de la feuille") Sheets("commande (2)").Select Sheets("commande (2)").Name = reponse End Sub
exécution interrompue, avec un focus sur la ligne 4
Partager