Erreur d?exécution ?-2147417848 (80010108)? lié à l'utilisation de 'SaveCopyAs'
maloadore
Messages postés5Date d'inscriptionmercredi 23 mars 2005StatutMembreDernière intervention13 novembre 2005
-
23 mars 2005 à 10:29
bgm2
Messages postés63Date d'inscriptionmercredi 2 mars 2005StatutMembreDernière intervention 3 juin 2005
-
1 avril 2005 à 12:29
La connexion à la bibliothèque de types ou dobjets pour le traitement à distance a été perdue. Appuyez sur OK pour supprimer la référence dans la boîte de dialogue.
--------------
Ce message apparait au second lancement avec le code pas plus compliqué que celui qui suit (erreur qui n'intervient pas sur toutes les machines) :
Private Sub CommandButton1_Click()
ThisWorkbook.SaveCopyAs ("c:\essai.xls")
End Sub
J'ai également essayé de supprimer le fichier pour le recréer, mais l'erreur se reproduit toujours au second lancement sur la ligne ThisWorkbook.SaveCopyAs ("c:\essai.xls").
exemple : Private Sub CommandButton1_Click()
Dim fs As Object
Set fs = CreateObject("Scripting.FileSystemObject")
If fs.fileexists("c:\essai.xls") Then
Kill "c:\essai.xls"
End If
ThisWorkbook.SaveCopyAs ("c:\essai.xls")
End Sub
Il faut toujours quitter l'application et la redémarrer pour chaque sauvegarde ave la seconde solution!
Est-ce quelqu'un pourrait m'expliquer comment sauvegarder à plusieurs reprises le classeur en cours d'utilisation en utilisant 'SaveCopyAs'?
(Configuration des postes : Windows 98 et office 2K)
maloadore
Messages postés5Date d'inscriptionmercredi 23 mars 2005StatutMembreDernière intervention13 novembre 2005 25 mars 2005 à 05:08
DarkCid :
Oui, j'ai déjà pensé à cette solution...mais elle ne me satisfait pas :
Exemple d'utilisation de mon prog. :
Je travaille sur un classeur 'A' et à n'importe quel instant, je souhaite le sauvegarder à un emplacement précis sous le nom 'B'
Si j'utilise 'Save', mon classeur s'appellera désormais 'B'; or il faut que je travaille toujours sur 'A'.
Avec 'SaveCopyAs', mon classeur reste 'A', mais la sauvegarde ne fonctionne qu'une seule fois.
maloadore
Messages postés5Date d'inscriptionmercredi 23 mars 2005StatutMembreDernière intervention13 novembre 2005 25 mars 2005 à 10:36
DarkCid :
Non plus, 'SaveAs' réagit comme 'Save' : Une fois que l'on enregistre, on ne travaille plus sur le classeur d'origine.
Seul 'SaveCopyAs' permet d'enregistrer un classeur sous un autre nom et de poursuivre son travail sur le classeur d'origine.
Vous n’avez pas trouvé la réponse que vous recherchez ?
maloadore
Messages postés5Date d'inscriptionmercredi 23 mars 2005StatutMembreDernière intervention13 novembre 2005 25 mars 2005 à 14:48
DarkCid :
oui, mais le seul problème, c'est que le classeur met entre une à deux minutes pour s'ouvrir.
J'ai isolé le problème pour que quelqu'un puisse m'aider à le résoudre.
En fait, l'application fait appelle à un serveur et je décrypte des fichiers lourds au démarrage.
Cette solution de fermer et de réouvrir à chaque enregistrement serait beaucoup trop couteuse en temps.
La copie de certains éléments du classeur est extrêmement plus rapide et me permet d'envoyer le fichier créé par mail.