4 месяца назад
Перенос таблицы AutoCAD в Word с помощью VBA
Работа с таблицами в AutoCAD нередко требует переноса данных в другие программы, например, Microsoft Word. Макрос выполняет следующие задачи: Приведённый ниже код написан на VBA и предназначен для выполнения в AutoCAD: Sub CopyAcadTableToWord() Dim acadApp As Object Dim acadDoc As Object Dim sset As Object Dim ent As Object Dim acadTable As Object Dim wordApp As Object Dim wordDoc As Object Dim wordTable As Object Dim rowCount As Integer Dim colCount As Integer Dim i As Integer, j As Integer ' Подключаемся к AutoCAD On Error Resume Next Set acadApp = GetObject(, "AutoCAD...
7 месяцев назад
Редактор шрифтов VBA: автоматизация изменения шрифта в Word (во всем документе включая колонтитулы)
В этой статье я расскажу, как создать простую программу на VBA для автоматического изменения шрифтов, размеров текста и стиля (курсива) в документе Word. Этот инструмент можно использовать для обработки основного текста, колонтитулов и текстовых объектов. После выполнения инструкции вы получите программу с удобным окном (UserForm), где можно: UserForm — это окно для взаимодействия с пользователем. Для создания интерфейса: Ниже представлен полный код с комментариями. Этот код загружает доступные шрифты и размеры текста в выпадающие списки...