Экспорт данных из AutoCAD в Excel: от таблиц до 3D-координат

(defun c:ExpPts (/ ss i pt file)
(setq ss (ssget '((0 . "POINT")))) ; Выбор всех точек
(setq file (open "C:\\Temp\\points.csv" "w"))
(repeat (setq i (sslength ss))
(setq pt (cdr (assoc 10 (entget (ssname ss (setq i (1- i)))))))
(write-line (strcat (rtos (car pt) 2 6) "," (rtos (cadr pt) 2 6) "," (rtos (caddr pt) 2 6)) file)
)
(close file)
(princ "\nЭкспорт завершён! Файл сохранён в C:\\Temp\\points.csv")
(princ)
)

Скрипт сохраняет координаты всех точек чертежа в файл points.csv с точностью до 6 знаков после запятой. Для запуска:

1. Скопируйте код в Блокнот и сохраните как ExportPoints.lsp.
2. В AutoCAD введите команду APPLOAD, выберите файл скрипта и нажмите Загрузить.
3. Введите в командной строке ExpPts и нажмите Enter.

3. Инструмент DATAEXTRACTION: экспорт атрибутов и свойств

Встроенный инструмент DATAEXTRACTION (доступен с AutoCAD 2008) позволяет экспортировать свойства объектов, атрибуты блоков и данные из таблиц в форматы .XLS, .CSV или .TXT. Алгоритм работы:

1. Введите команду DATAEXTRACTION или выберите в меню Утилиты → Извлечение данных.
2. В мастере извлечения укажите:
   • 📌 Объекты: выберите типы (например, Блоки, Текст, Полилинии).
   • 📌 Свойства: отметьте нужные поля (координаты, длины, площади, пользовательские атрибуты).
   • 📌 Формат вывода: для Excel выбирайте .XLS (но лучше .CSV — меньше ошибок).

Ограничения метода:

• 🚫 Не экспортирует динамические блоки (только статические атрибуты).
• 🚫 Максимум 10 000 строк на один файл (в AutoCAD 2020+ ограничение снято).
• 🚫 Координаты округлены до 4 знаков после запятой (критично для геодезических чертежей).

4. Конвертация через промежуточные форматы: .DXF и .SHP

Если нужно перенести сложные геометрические данные (например, контуры участков или 3D-поверхности), оптимальный путь — экспорт в .DXF с последующей конвертацией. Пошаговая инструкция:

1. В AutoCAD введите команду DXFOUT и сохраните файл в формате R2010 ASCII (лучшая совместимость).
2. Откройте .DXF в AutoCAD Map 3D или QGIS (бесплатная альтернатива).
3. Экспортируйте данные в .CSV или .XLSX через инструменты этих программ:
   • В AutoCAD Map 3D: Экспорт → Таблица объектов → Excel.
   • В QGIS: Слой → Сохранить как → CSV.

Преимущества метода:

• 🔸 Сохраняет все координаты без округления (важно для ГИС-проектов).
• 🔸 Поддерживает 3D-геометрию (в отличие от DATAEXTRACTION).
• 🔸 Можно фильтровать объекты по слоям или типам перед экспортом.

⚠️ Внимание: При экспорте .DXF из AutoCAD 2026+ в формате R2018 координаты могут сдвинуться на 1–2 мм из-за изменений в обработке чисел с плавающей запятой. Для критичных проектов используйте формат R2010.

DXF

CSV

XLS/XLSX

TXT

Другой-->

5. Автоматизация через Dynamo и Python

Для пользователей AutoCAD 2021+ с установленным Dynamo доступен визуальный способ автоматизации. Пример скрипта для экспорта координат всех кругов на чертеже:

1. Откройте Dynamo из AutoCAD (Управление → Dynamo).
2. Соберите цепочку узлов:

   AutoCAD → Select Model Objects (тип: Circle)
   → Geometry.CoordinateSystem → Watch (экспорт в Excel)

3. Добавьте узел Excel.WriteToFile и укажите путь к файлу.

Для продвинутых пользователей подойдёт Python-скрипт с библиотекой pyautocad:

import pyautocad
from openpyxl import Workbook

acad = pyautocad.Autocad()
wb = Workbook()
ws = wb.active

for circle in acad.iter_objects("Circle"):
center = circle.Center
ws.append([center[0], center[1], center[2]])

wb.save("circles_coordinates.xlsx")

Преимущества автоматизации:

• 🤖 Пакетная обработка: экспорт тысяч объектов за секунды.
• 🤖 Гибкость: можно фильтровать объекты по слоям, цветам или типам.
• 🤖 Поддержка облаков: данные сразу загружаются в Google Sheets или OneDrive.

6. Типичные ошибки и их решения

Даже опытные пользователи сталкиваются с проблемами при экспорте. Разберём TOP-5 ошибок и способы их исправления:

Если проблема не решена, проверьте:

• 🔧 Версию AutoCAD: в AutoCAD 2026 исправлены ошибки с кодировкой UTF-8.
• 🔧 Настройки Excel: отключите Автозамена для чисел (Файл → Параметры → Правописание).
• 🔧 Антивирус: некоторые программы блокируют доступ AutoCAD к папкам.

FAQ: Частые вопросы

(defun c:ExpLayers (/ file layers)
(setq file (open "C:\\Temp\\layers.csv" "w"))
(write-line "Имя,Цвет,Тип линии,Вес линии" file)
(foreach layer (vla-get-Layers (vla-get-ActiveDocument (vlax-get-acad-object)))
(write-line (strcat (vla-get-Name layer) "," (itoa (vla-get-Color layer)) "," (vla-get-Linetype layer) "," (rtos (vla-get-Lineweight layer) 2 0)) file)
)
(close file)
(princ "\nСписок слоёв экспортирован в C:\\Temp\\layers.csv")
)

import win32com.client
acad = win32com.client.Dispatch("AutoCAD.Application")
excel = win32com.client.Dispatch("Excel.Application")
Код для копирования данных из AutoCAD в Excel