sujet Re: Depuis Excel récupérer nom des onglets d'un fichier dans AutoCAD – tous produits - Forum Français

Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Thu, 26 Jul 2007 17:23:22 GMT

Bonsoir,

je souhaiterai récupérer depuis excel par une macro VBA le nom des onglets d'un fichier Autocad LT, est ce possible?

exemple dans une Inputbox je rentre adresse du dessin
c:\dessin1.Dwg

la macro me donne le nom des differentes présentation(layout) présente dans ce fichier.

Ca me serait très utile

Merci

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Thu, 26 Jul 2007 19:14:02 GMT

Bonsoir,
Avec LT ça ne va pas être possible.
Désolé.
--
Bernard Flavignard
www.guidonchalettois.fr
a écrit dans le message de news:
5670714@discussion.autodesk.com...
Bonsoir,

je souhaiterai récupérer depuis excel par une macro VBA le nom des onglets d'un
fichier Autocad LT, est ce possible?

exemple dans une Inputbox je rentre adresse du dessin
c:\dessin1.Dwg

la macro me donne le nom des differentes présentation(layout) présente dans ce
fichier.

Ca me serait très utile

Merci

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Thu, 26 Jul 2007 19:43:24 GMT

Bonsoir,

Bernard aurais tu un idée de la syntaxe siqu'il faudrait si j'avais la version pleine d autocad.

Je trouve bizarrz quand meme qqu'il faille avoir la version pleine dautocad, car la macro je la lance d'excell, autocad n'est la qu'en passif, car je sais que dans la light l'interface VBA n'est pas incrémenté

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Thu, 26 Jul 2007 19:49:44 GMT

Re,
Il n'y a pas que l'interface qui ne soit pas implémentée!
Depuis l'éditeur VBA excel, vas voir Outils, Références, vois-tu des références
à AutoCAD ?
Je pense que non, et donc tu ne vas pas pouvoir dialoguer avec l'application
AutoCAD.
Bon courage quand même.
--
Bernard Flavignard
www.guidonchalettois.fr
a écrit dans le message de news:
5670963@discussion.autodesk.com...
Bonsoir,

Bernard aurais tu un idée de la syntaxe siqu'il faudrait si j'avais la version
pleine d autocad.

Je trouve bizarrz quand meme qqu'il faille avoir la version pleine dautocad, car
la macro je la lance d'excell, autocad n'est la qu'en passif, car je sais que
dans la light l'interface VBA n'est pas incrémenté

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Fri, 27 Jul 2007 05:33:59 GMT

Bonjour,

Bernard en fait si j'ai plein de références concernant autocad
en allant dans les références de la plateforme VBA d'excell

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Fri, 27 Jul 2007 07:20:40 GMT

Pourrais-tu me donner une copie d'écran avec ces références, je n'ai pas LT
A suivre
--
Bernard Flavignard
www.guidonchalettois.fr
a écrit dans le message de news:
5671389@discussion.autodesk.com...
Bonjour,

Bernard en fait si j'ai plein de références concernant autocad
en allant dans les références de la plateforme VBA d'excell

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Fri, 27 Jul 2007 08:03:52 GMT

Bonjour
(layoutlist)
tu récupères la liste de tes onglets..........
@+

Michel a

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Fri, 27 Jul 2007 08:20:15 GMT

Michel,
La question est "Depuis Excel ....." et avec LT!
Tu as répondu un peu vite je pense.
A+
--
Bernard Flavignard
www.guidonchalettois.fr
a écrit dans le message de news: 5671452@discussion.autodesk.com...
Bonjour
(layoutlist)
tu récupères la liste de tes onglets..........
@+

Michel a

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Fri, 27 Jul 2007 10:08:51 GMT

Tu as raison Bernard, comme il parle de version pleine et pour aller vite cette ligne suffit pour avoir la liste des onglets.
Effectivement en vba il n'y a pas de lien depuis excel (par rapport au référence de la biblio) vers autocad lt, sauf que j'ai vue certain le font comme Xanadu fournit excellink qui communique avec Autocad Lt, mais je n'ai pas compris comment ???

Par contre si tu as le code Vba pour Autocad version pleine je suis preneur.....

plus qu'un jour de vélo tu seras plus en forme lundi :-)..

Michel a

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Fri, 27 Jul 2007 10:49:22 GMT

Tu veux l'adaptation de Excellink qui donnerai la liste des présentations dans
excel ?
Si je trouve le temps pourquoi pas.
Mais de toute façon ça ne sera pas pour LT.
A+
--
Bernard Flavignard
www.guidonchalettois.fr
a écrit dans le message de news: 5671482@discussion.autodesk.com...
Tu as raison Bernard, comme il parle de version pleine et pour aller vite cette
ligne suffit pour avoir la liste des onglets.
Effectivement en vba il n'y a pas de lien depuis excel (par rapport au référence
de la biblio) vers autocad lt, sauf que j'ai vue certain le font comme Xanadu
fournit excellink qui communique avec Autocad Lt, mais je n'ai pas compris
comment ???

Par contre si tu as le code Vba pour Autocad version pleine je suis preneur.....

plus qu'un jour de vélo tu seras plus en forme lundi :-)..

Michel a

Re: Depuis Excel récupérer nom des onglets d'un fichier

patrick_35 — Fri, 27 Jul 2007 11:00:34 GMT

Bonjour
Et avec les activex, cela ne fonctionnerai pas avec une LT ?

Sinon, avec une version pleine, un exemple extrait de l'aide à adapter avec excel

Sub Example_Item()
' This example shows two uses of the Item method.
' The first uses Item with an index counter to return an item in a collection.
' The second uses Item with a string to return an item in a collection.

' Iterate thru the model space collection,
' get all the items in the collection
' and store them in an array called newObjs
Dim count As Integer
count = ThisDrawing.ModelSpace.count

ReDim newObjs(count) As AcadEntity
Dim index As Integer
For index = 0 To count - 1
Set newObjs(index) = ThisDrawing.ModelSpace.Item(index)
Next

' Get a particular item, in this case a layer, based on name "0"
Dim layerObj As AcadLayer
Set layerObj = ThisDrawing.Layers.Item("0")

End Sub

@+

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Sun, 29 Jul 2007 15:57:38 GMT

Bonsoir,

Je post demain(lundi)les références Bernard, je n'ai pas autocad chez moi

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Mon, 30 Jul 2007 06:51:19 GMT

Bonjour,

VVoici les références que trouve excel en ayant la vversion Autocad LT 2004

Autocad2004 Type Library
Autocad LT 2000i Objetct library
Autocad/ObjetDBX Common Objetct Library

SI çà vous parle

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Mon, 30 Jul 2007 08:16:37 GMT

Bonjour

jr vois par rapport aux référence vba tu as Autocad 2004 et lt2000, mais le seul lien c'est ''Autocad2004 type Library'' la communication sera entre excel et autocad 2004.

par contre pour les autres qu'en pense Bernard ???

@+

Michel a

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Mon, 30 Jul 2007 11:17:19 GMT

Bonjour,

En fait on avais Autocad 2000 LT et pui on a fais la mise a jour vers autocad LT 2004

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Mon, 30 Jul 2007 12:13:39 GMT

il n'y pas de lien vba <> autocad LT, car le fichier .tlb n'est pas livré
avec la LT.

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Mon, 30 Jul 2007 20:08:28 GMT

Bonsoir,
Je suis étonné de voir de telles références avec LT, mais je n'ai jamais eu LT,
alors je propose à Autocadiste de tester ce petit bout de code dans excel, puis
de nous dire ce qu'il obtient.
A mon avis un message d'erreurs, mais .....

Sub lienacad()
Dim BaCadObj As Object
Dim ObjDessin As Object
On Error Resume Next
Set BaCadObj = GetObject(, "AutoCAD.Application.16")
If Err Then
Err.Clear
Set BaCadObj = CreateObject("AutoCAD.Application.16")
If Err Then
MsgBox Err.Description
Exit Sub
End If
End If
Set ObjDessin = BaCadObj.ActiveDocument
BaCadObj.Visible = True
BaCadObj.WindowState = xlMaximized
MsgBox ObjDessin.Name
End Sub

A suivre
--
Bernard Flavignard
www.guidonchalettois.fr
a écrit dans le message de news: 5673172@discussion.autodesk.com...
Bonjour

jr vois par rapport aux référence vba tu as Autocad 2004 et lt2000, mais le seul
lien c'est ''Autocad2004 type Library'' la communication sera entre excel et
autocad 2004.

par contre pour les autres qu'en pense Bernard ???

@+

Michel a

Re: Depuis Excel récupérer nom des onglets d'un fichier

patrick_35 — Tue, 31 Jul 2007 06:27:46 GMT

Bonjour
Ne programmant pas en vba, je ne saurais être d'une grande aide, mais tu peux toujours regarder ce sujet qui parle d'utiliser ObjectDBX depuis Excel.
En regardant le programme, j'ai vu qu'il récupérait les noms des onglets. Reste à savoir s'il fonctionne avec une LT.

@+

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Tue, 31 Jul 2007 07:58:48 GMT

vous allez me trouver pessimiste, mais j'ai presque envie de dire:
"je vous paie des frites si vous trouvez une solution vba pure sans passer
par du diesel"

ça se saurait si autocad LT acceptait le vba. (pourquoi payer plus cher
sinon?)

la plupart des appli qui tournent avec autocad LT sont des arx recompilés à
la limite du cracking.

Re: Depuis Excel récupérer nom des onglets d'un fichier

Anonymous — Tue, 31 Jul 2007 08:04:50 GMT

Salut,
>je vous paie des frites ....
A mon avis ça mérite mieux que des frites !!
Forces toi un peu.
A+
--
Bernard Flavignard
www.guidonchalettois.fr
"sigecom" a écrit dans le message de news:
5674423@discussion.autodesk.com...
vous allez me trouver pessimiste, mais j'ai presque envie de dire:
"je vous paie des frites si vous trouvez une solution vba pure sans passer
par du diesel"

ça se saurait si autocad LT acceptait le vba. (pourquoi payer plus cher
sinon?)

la plupart des appli qui tournent avec autocad LT sont des arx recompilés à
la limite du cracking.