Sauvegarde d'un dessin AutoCAD depuis Excel.

[DenisHen]

Bonjour à tous.

 

Voilà mon problème, depuis Excel (2013) je créé un dessin dans AutoCAD (2018) et je tente de le sauvegarder avec un .SaveAs, mais Excel me sort une erreur "-2145320861".

 

Je n'ai rien trouvé sur cette erreur.

 

Voici le code test :

Sub Test()
   Dim AutoCAD As AcadApplication

   Set AutoCAD = GetObject(, "AutoCAD.Application")
   AutoCAD.Documents.Add
   AutoCAD.Visible = True
   AutoCAD.ActiveDocument.SaveAs "C:\toto.dwg", acNative

   AutoCAD.ActiveDocument.Close
   Set AutoCAD = Nothing
End Sub

Si quelqu'un a une solution, une astuce, un conseil... je suis preneur...

[Patrick_35]

Salut

 

J'ai trouvé cet exemple.

 

@+

[DenisHen]

Salut Patrick_35.

 

Merci pour cette réponse, j'ai écris mon code en m'inspirant justement de ce code là...

[Patrick_35]

Tu n'as pas acNative dans l'exemple.

Et as-tu les droits d'écriture sur la racine ?

 

@+

[DenisHen]

Tu n'as pas acNative dans l'exemple.

Je l'ai trouvé dans l'aide AutoCAD, mais avec ou sans, c'est pareil.

 

Et as-tu les droits d'écriture sur la racine ?

Ben en fait, je le croyais... Mais non, c'est donc bien ça...

 

Comment dire... Mille mercis... ;)