Y
Yoyo
Guest
Bonjour,
Désolé de recréer un post pour ce problème mais l'ancien ce trouvant au niveau de la page trois je pense que peu de monde on vu le lien que j'ai ajouter pour télécharger mon fichier.
Donc voila je solicite votre aide car ma macro quote maker plante une fois sur deux et ferme excel jusqu'au moment ou je ne peux plus du tout ouvrir excel
Voici rapidement un morceau de code:
Code:
ThisWorkbook.Activate
Application.ScreenUpdating = False
Application.DisplayAlerts = False
' Création d'une quotation
Sheets('Template Quote VSE').Select
Sheets('Template Quote VSE').Copy After:=Sheets(3) ' Copie la feuille template après la feuille 2 c'est l que ca plante une fois sur 2
Sheets('Template Quote VSE (2)').Select
Sheets('Template Quote VSE (2)').Name = 'Quote' 'renomme la feuille
'Dim VoirFeuille As Integer
Application.DisplayAlerts = True
Donc de temps en temps ça bug avec toujours le même message:
Erreur d'execution 1004
la méthode de la classe worksheet a échoué
Continuer Fin Debogage Annuler
Excel.exe a généré des erreurs et sera fermé par windows. Vous devrez redemarrer le programme.
Un journal des erreurs est en cours de création.
JE vous retransmet l'adresse ou vous pouvez télécharge mon fichier
Ce lien n'existe plus
Merci d'avance de votre aide
Désolé de recréer un post pour ce problème mais l'ancien ce trouvant au niveau de la page trois je pense que peu de monde on vu le lien que j'ai ajouter pour télécharger mon fichier.
Donc voila je solicite votre aide car ma macro quote maker plante une fois sur deux et ferme excel jusqu'au moment ou je ne peux plus du tout ouvrir excel
Voici rapidement un morceau de code:
Code:
ThisWorkbook.Activate
Application.ScreenUpdating = False
Application.DisplayAlerts = False
' Création d'une quotation
Sheets('Template Quote VSE').Select
Sheets('Template Quote VSE').Copy After:=Sheets(3) ' Copie la feuille template après la feuille 2 c'est l que ca plante une fois sur 2
Sheets('Template Quote VSE (2)').Select
Sheets('Template Quote VSE (2)').Name = 'Quote' 'renomme la feuille
'Dim VoirFeuille As Integer
Application.DisplayAlerts = True
Donc de temps en temps ça bug avec toujours le même message:
Erreur d'execution 1004
la méthode de la classe worksheet a échoué
Continuer Fin Debogage Annuler
Excel.exe a généré des erreurs et sera fermé par windows. Vous devrez redemarrer le programme.
Un journal des erreurs est en cours de création.
JE vous retransmet l'adresse ou vous pouvez télécharge mon fichier
Ce lien n'existe plus
Merci d'avance de votre aide