Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
PMO
Bonjour,
A TOUT HASARD essayez d'insister jusqu'à ce qu'Excel comprenne l'instruction en la réitérant plusieurs fois.
Dim WT As Workbook Dim compteur% On Error Resume Next Refaire: If compteur% = 6 Then On Error GoTo 0 Set WT = Workbooks.Add(Template:="C:MonRepToto.xlt") If WT Is Nothing Then compteur% = compteur% + 1 GoTo Refaire End If
Cordialement. -- PMO Patrick Morange
Bonsoir à tous!
Je reformule ma question, car j'ai l'impression de ne pas avoir été clair:
J'ai développé une macro commande Mamacro.xla sous Excel 2002. Elle fonctionne parfaitement dans cet environnement.
Lorsque je la lance dans un environnement Excel 2003, j'ai un message d'erreur sur une instruction du type:
WorkBooks.Add Template:= "C:MonRepToto.xlt" (j'ajoute un classeur suivant le modèle Toto.xlt)
Le message est: "La méthode Add de l'objet Workbooks a échoué" Je passe alors en mode débug pas à pas et l'instruction s'éxécute????????
J'ai vérifié: - la présence du modèle Toto.xlt dans le répertoire C:MonRep, - le bon fonctionnement du modèle.
Je ne comprends plus......Merci pour votre aide! -- Cordialement, Mikel
Bonjour,
A TOUT HASARD essayez d'insister jusqu'à ce qu'Excel comprenne
l'instruction en la réitérant plusieurs fois.
Dim WT As Workbook
Dim compteur%
On Error Resume Next
Refaire:
If compteur% = 6 Then On Error GoTo 0
Set WT = Workbooks.Add(Template:="C:MonRepToto.xlt")
If WT Is Nothing Then
compteur% = compteur% + 1
GoTo Refaire
End If
Cordialement.
--
PMO
Patrick Morange
Bonsoir à tous!
Je reformule ma question, car j'ai l'impression de ne pas avoir été clair:
J'ai développé une macro commande Mamacro.xla sous Excel 2002.
Elle fonctionne parfaitement dans cet environnement.
Lorsque je la lance dans un environnement Excel 2003, j'ai un message
d'erreur sur une instruction du type:
WorkBooks.Add Template:= "C:MonRepToto.xlt" (j'ajoute un classeur suivant
le modèle Toto.xlt)
Le message est: "La méthode Add de l'objet Workbooks a échoué"
Je passe alors en mode débug pas à pas et l'instruction s'éxécute????????
J'ai vérifié:
- la présence du modèle Toto.xlt dans le répertoire C:MonRep,
- le bon fonctionnement du modèle.
Je ne comprends plus......Merci pour votre aide!
--
Cordialement, Mikel
A TOUT HASARD essayez d'insister jusqu'à ce qu'Excel comprenne l'instruction en la réitérant plusieurs fois.
Dim WT As Workbook Dim compteur% On Error Resume Next Refaire: If compteur% = 6 Then On Error GoTo 0 Set WT = Workbooks.Add(Template:="C:MonRepToto.xlt") If WT Is Nothing Then compteur% = compteur% + 1 GoTo Refaire End If
Cordialement. -- PMO Patrick Morange
Bonsoir à tous!
Je reformule ma question, car j'ai l'impression de ne pas avoir été clair:
J'ai développé une macro commande Mamacro.xla sous Excel 2002. Elle fonctionne parfaitement dans cet environnement.
Lorsque je la lance dans un environnement Excel 2003, j'ai un message d'erreur sur une instruction du type:
WorkBooks.Add Template:= "C:MonRepToto.xlt" (j'ajoute un classeur suivant le modèle Toto.xlt)
Le message est: "La méthode Add de l'objet Workbooks a échoué" Je passe alors en mode débug pas à pas et l'instruction s'éxécute????????
J'ai vérifié: - la présence du modèle Toto.xlt dans le répertoire C:MonRep, - le bon fonctionnement du modèle.
Je ne comprends plus......Merci pour votre aide! -- Cordialement, Mikel
