AutoCad - Como extraer informacion de un bloque con macros?

Hola, quiero saber si hay una forma de leer datos que están almacenados en un bloque de un dibujo en autocad, y llevar esta informacion a una tabla en excel. Alguien ha hecho algo similar??

Te voy a ser de poca ayuda. Poderse se puede, pero no se decirte como. Ojala alguien pueda resolvertelo.
Ya siento no poder hacer mas.

Un saludo.

Muchas gracias José Luis, al menos saber que se puede me sirve para seguir investigando.
Salu2

El comando EATTEXT extrae los atributos de los bloques q ud. seleccione en el dibulo, puede exportarlos a excel si es lo q necesita.

Muchas gracias Marisol, lo probe en autocad y funciona perfecto, pero no tengo claro como usarlo desde excel, es decir si puedo hacer una macro que use este comando tendria que primero lograr abrir el archivo .dwg y luego ejecutar EATTEXT??? alguna pista?

A mí también me gustaría saber cómo, estoy trabajando en un código, que extrae ciertas propiedades de layers, poliline o bloques, pero hay ciertos comandos que aún no encuentro o identifico para especificar que requiero extraer, podríamos trabajar juntos esa macro por el bien común.

Que tendría esa macro de diferente o adicional al comando eattext?

Correcto. AutoCad LT no incluye nada de las express tools.

Entonces estás satisfecho con el attext (o dataextraction que son lo mismo) pero quieres cargarlo en el autocad LT 2024
(La solución sería básicamente para LT2024 ya que es difícil superar lo que ofrece el profesional y además las versiones de LT anteriores a la 2024 no soportaban macros o rutinas)

En fin, Si delimitas el alcance sin ser muy pretenciosos al principio (después se va ampliando), y compartes lo que dices que estás trabajando para analizarlo, yo te puedo ayudar tanto a afinar lo que tienes como con esas funciones que dices que no conoces.

En efecto e buscado soluciones solamente para la versión LT 2024, no soy muy profesional en esto, pero busque he intenté con varios códigos, espero me puedas ayudar, pude rescatar esto

Dim Acad, AcadDoc, AcadModel As Object
Dim TitApli As String


Sub PRUEBA()
Set Acad = GetObject _
("C:\Users\Escritorio\"Prueba CAD.dwg")

With Acad
TitApli = .Caption
End With
TitApli = Acad.ActiveDocument.Name

TitApli = Acad.Caption


TitApli = Acad.Caption
MsgBox TitApli
End Sub


espero me des algún consejo, o a tu experiencia, ¿es mejor desistir con esto?

Bueno.
Eso que compartiste no es nada que te pueda servir. Primero porque solo es un pequeñísimo código para extraer el nombre de un archivo a como se muestra en la barra de títulos. Segundo porque es código Visual Basic, y en ese lenguaje solo correría en el AutoCad profesional. El LT solo acepta rutinas de Autolisp y módulos de extensión en C++ o .NET, pero lo segundo requiere de conocimiento mucho más profesional

Así que empecemos de cero. Si quieres aprender y resolver lo tuyo no desistas

Puedes leer sobre autolisp en el manual de Johnathan Prestamo que está en este mismo web en la seccion de cursos, específicamente el capítulo 11 es el que requerirías.

Yo te ofrezco ayudarte con la lógica de los algoritmos y con fragmentos de código para que armes tus primeros "Frankesteins", y a vos te tocará armarlo y probarlo en el lt porque no tengo esa versión

Solo muestra un dwg con el tipo de dibujo del que quisieras extraer datos y un archivo en texto plano o de excel donde se vea el resultado de la extracción.
Y estudia un poco ese capítulo 11 del manual intentando hacer rutinas pequeñas como modificar objetos gráficos o extraer una propiedad y mostrarla.

Gracias por tu ayuda y tu repuesta, precisamente amigo, ese es el gran problema, que una vez que ejecutó el código, solo me habré el archivo y hasta ahí, por más código que le ponga, no me permite ejecutar nad más, me da un aviso de problema de ejecución o por error en desbordamiento, o sea, que no tolera ningún otro proceso o procedimiento con macros, en verdad, le he intentado con muchos códigos y he leído, lo cual sospecho que no metiendome a al lenguaje ACAD, se podrá resolver en la versión LT 2024

el autolisp es otro lenguaje muy diferente a ese que tienes (si le echas un ojo al manual que te mencioné verás que es totalmente otra cosa)

Y bueno, yo no dimensiono si lo que estás pensando en resolver es simple como por ejemplo listar atributos de bloques o si es algo muy complejo como catalogar partes. por eso es importante que muestres el alcance en dwg y los datos extraídos. Podrían ser unas cuantas líneas de código que se escriben en un rato o un programa complejo de semanas de trabajo, y de eso dependerá la ayuda que se te brinde

Es solo para listare atributos de layers, con con sus propiedades, o sea, tampoco será como una sub rutina o algo así.
Y haciendo caso a las recomendaciones, me pondré a revisar el curso que me has recomendado.

Muestra un dibujo con algún (os) objeto (s) como el que quisieras analizar y un archivo TXT, XLS o CSV como te gustaría que se muestren las propiedades.


En todo caso te dejo un código por aquí por si quieres analizarlo.

Ponelo en un archivo de texto (puede ser en el VLIDE de Autocad que te lo muestra más bonito o en un simple block de notas.)

Guardalo con la extension .LSP

Cargalo en el Autocad con el comando appload o simplemente arrastrando el ícono del LSP sobre la pantalla o presionando Ctrl+Alt+E en el VLIDE

Ejecuta el comando datos y selecciona cualquier objeto del dibujo para obtener las propiedades de la capa en la que está el objeto