Как удалить vba в автокаде
Для того, чтобы полностью удалить (деинсталлировать) программы от Autodesk с вашего компьютера, разработчики рекомендуют выполнить следующие шаги.
1. Сохраните резервные копии всех файлов настроек и файлов конфигураций
Если вы настраивали программное обеспечение под себя, свои потребности и привычки, то сохраните резервные копии всех файлов настроек и файлы конфигураций. Если речь идет об AutoCAD, то сохраните файлы CUI, CUIX, программы на AutoLISP, файлы PGP и пр.
По-умолчанию эти файлы расположены в папке
C:\Users\**ИМЯ_ПОЛЬЗОВАТЕЛЯ**\AppData\Roaming\Autodesk\AutoCAD 2017\R21.0\rus\Support
2. Перезагрузите компьютер
Перезагрузка нужна для того, чтобы применились все обновления, которые могли быть установлены во время текущей сессии работы.
3. Закройте все запущенные приложения Autodek
Запустите диспетчер задач Windows (нажмите Ctrl + Shift + Esc или Ctrl + Alt + Del, а затем выберите Запустить диспетчер задач).
В появившемся окне диспетчера задач на вкладке Процессы выберите процессы Autodesk и нажмите кнопку Завершить процесс.
4. Удалите программы стандартными средствами через Панель управления Windows
Обратите внимание, что даже для программных комплексов каждый продукт, входящий в его состав, устанавливается отдельно и требует отдельной деинсталляции.
ВАЖНО! Перед удалением основной программы сначала удалите все приложения и надстройки, а потом уже базовое приложение. Например, сначала нужно удалить Eco Material Adviser for Autodesk Inventor, а потом уже сам Inventor. Это правило распространяется и на VBA enabler, пакеты локализации, офф-лайновые справочные системы, Библиотеку материалов (Autodesk Material Library) и пр.
ВАЖНО! Библиотека материалов общая для всех продуктов Autodesk, поэтому, если вы удалите библиотеку материалов вместе c Inventor, то ее не будет и в других продуктах.
При деинсталляции Библиотеки материалов сначала удалите библиотеку с изображениями среднего разрешения (Autodesk Material Library Medium Resolution Image Library), потом базового разрешения (Autodesk Material Library Base Resolution Image Library), потом с низким разрешением (Autodesk Material Library Low Resolution Image Library), а потом уже саму библиотеку (Autodesk Material Library).
ВАЖНО! Если система предлагает перезагрузить компьютер после процесса деинсталляции, то перезагрузите его перед тем, как начать удалять следующую программу.
5. Удалите программы с помощью утилиты Microsoft Fixit
Запустите утилиту Microsoft Fixit (скачать можно с официального сайта Microsoft) и еще раз удалите программу с ее помощью. Не всегда штатным программам деинсталляции удается все удалить, применение сторонних программ может дать положительный результат.
6. Удалите файлы лицензии
ВАЖНО! Если вы планируете переустановить программы Autodesk, то удаление файлов лицензий потребует повторной регистрации продуктов.
7. Удалите все остальные файлы из каталогов и сами каталоги тоже
ВАЖНО! Удаление общих папок повлияет на работу всех программ Autodesk, установленных на вашем компьютере. Поэтому, если вы хотите удалить только часть программ, то будьте осторожны.
- C:\Program Files\Autodesk\
- C:\ProgramData\Autodesk\
- C:\Program Files (x86)\Autodesk\
- C:\Program Files\Common Files\Autodesk Shared
- C:\Users\All Users\Autodesk\
- C:\Users\**ИМЯ_ПОЛЬЗОВАТЕЛЯ**\AppData\Roaming\Autodesk\
- C:\Users\**ИМЯ_ПОЛЬЗОВАТЕЛЯ**\AppData\Local\Autodesk\
8. Удалите записи продуктов Autodesk из реестра ОС Windows
Для удаления записей из реестра можно использовать штатный Редактор Реестра (Microsoft Registry Editor) или любой другой сторонний. Для запуска редактора напишите в строке Выполнить команду REGEDIT.
- HKEY_CURRENT_USER\Software\Autodesk
- HKEY_LOCAL_MACHINE\Software\Autodesk
9. Очистите папку Temp
Обычными средствами очистите папку временных файлов Temp. По-умолчанию она расположена по адресу C:\Windows\Temp\
После этих действий ваша система будет абсолютно чиста от следов программных продуктов Autodesk. Во всяком случае, в большинстве случаев.
Однако, если следы остались, то дальнейшее удаление нужно проводить всеми доступными средствами на свой страх и риск.
Также рекомендую использовать вот эту инструкцию от Microsoft How to troubleshoot Windows Installer errors, в ней есть раздел Fix that installation or update process was not completed successfully.
UPD1: При установке ПО Autodesk дистрибутивы распаковываются в папку C:\Autodesk, после завершения установки их можно спокойно удалить.
С уважением, Андрей
Если вы получили ответ на свой вопрос и хотите поддержать проект материально - внизу страницы для этого есть специальная форма.
168 комментариев:
Этот комментарий был удален администратором блога.
Уважаемый Томатин Дмитрий. Я смотрю вы не страдаете от переизбытка воспитания. Прошу впредь на страницах моего блога следить за своим поганым языком или просто закрыть страницу браузера. Если вы считаете, что я не прав, приведите доказательства. А также укажите версию AutoCAD, ОС, тип лицензии (коммерческая, студенческая или ворованная с кучей патчей), устанавливались ли приложения. А иначе вы являетесь тем, кем меня назвали
zdraste xochu udalit 3ds max 14 postavit 15 )) kak udalit chtob sceny i materiali ostalis
а про какие файлы лицензии вы говорите?
При активации создаются файлы лицензий с расширением lic
у меня windows 8.1 я удалил автокад 2014 и хочу снова его установить но установщик говорит что уже она установлена как его полностью очистить?
К сожалению, пока не приходилось сталкиваться с Win 8, помочь не могу
Про fixit во втором пункте как раз написано
К сожалению, fixit с windows 8.1 не работает.
пока не приходилось работать с Win 8, ничего не могу сказать
Большое спасибо. Всё корректно удалилось и установилось.
Вячеслав, рад, что все получилось!
Спасибо! Fixit, и конечно Вам!
Этот комментарий был удален автором.
Сначала удаляется Language Pack, потом сам продукт. Ветки и записи в реестре удалить руками (предварительно сделайте резервную копию реестра)
удалил некоректно автокад, и захотел переустановить но установщик показывает 2 галочки, и не устанавливается что делать . *??((
Какой автокад? Какая ОС?
Скриншот окна установки приложите.
Но вообще, Fixit вам поможет
Autodesk_AutoCAD_2012_SP1, Windows 7 Максимальная,
Помогло все это + чистка реестра в ручную от всего, что связано с надписью autodesk
Рад, что все у вас получилось
Не удалить INVENTOR 2015. По нормальному не удалялся, удалил принудительно. Чистил С, реестр. Все равно пишет что установлен. Не знаю что делать.
Андрей, добрый вечер! Могу ли я задать Вам вопрос по нелицензионной (пропатченной) версии Acad?
Здравствуйте, Андрей ещё раз. Прошлой ночью не смог высидеть перед компом, поэтому вопрос по нелицензионной версии задаю сейчас. У меня такая проблема. Т.к. Автокад (а именно AutoCAD 2004) является моей рабочей программой, то потеря его работоспособности явилась для меня очень неприятной неожиданностью. Случилось это так. Запускаю программу со значка на рабочем столе, вроде бы происходит загрузка и. вдруг вылетает акадовское окошко, что необходимо зарегистрироваться, т.е. заново пройти процедуру регистрации, получить код запроса и далее использовать его в киигене, чтобы получить ряд цифр, необходимых для регистрации. НО! Оказывается, что код запроса имеет лишние восемь цифр! И поэтому эти лишние цифры кииген проглотить не может. Т.е. можно забыть о всякой регистрации! Пробовал снести Автокад с последующей чисткой реестра. Ничего не помогает, только форматирование жёсткого диска с последующей переустановкой виндуса, ну и соответственно всех-всех программ. Такое происходило у меня несколько раз на разных компьютерах. Пробовал найти ответ в интернете, но единственное, что смог обнаружить, что у многих возникает такая проблема, и ответа никто не даёт. Совершенно случайно наткнулся на этот сайт. Прочитал Вашу статью и подумал, что Вы сможете объяснить мне в чём же всё-таки дело. Скажу сразу, что нет у меня столько денег, чтобы покупать лицензию, да и "времена сейчас начинаются непростые" (цитата по В.В.Путину и Д.А.Медведеву). Лицензию мне никто не купит. Да и привык я к 2004-му Акаду и отказываться от него не хочу. Он меня полностью устраивает. Надеюсь на Ваш ответ. Заранее огромное СПАСИБО! Станислав.
Станислав, а где здесь про AutoCAD? Здесь про какой-то кейген. Поищите другую ломаную версию или другой кейген.
Да просто получается, что невозможно полностью удалить Автокад. Какие-то следы всё равно остаются. И это нечто мешает переустановке Автокада, если не провести форматирование жёсткого диска. Я однажды пытался почистить комп от всего, что остаётся после Автокада, средствами, которые рекомендуют разработчики. Ничего не вышло. Хотя ни в коей мере не буду утверждать, что в Вашей статье написана какая-то неправда или хотя бы полуправда. Очень полезная статья! А Автокад 2004-й "ломаный" везде продают скопированный как-будто с одной балванки, для которого один единственный на весь инет кейген. Всё-таки не в этом дело. Ну да ладно! Будем искать (цитата по С.С.Горбункову).
У меня ситуация такая. Я установил Autodesk_Inventor_2015_SP1 (RUS). Во время установки была какая-то ошибка (не помню какая) и программа не запустилась. Решил переустановить. Удалил программой Uninstall tool, вычистил все папки Autodesk, которые нашлись. При повторной установке - вышеописанная проблема - установщик сообщает, что программа уже установлена. Попробовал установить Autodesk_Inventor_HSM_Pro_2015 (EN). Установка и регистрация прошли без проблемм. Очень хотелось пользоваться русской версией и я решил заново попробовать её установить. Удалил всё, как описали вы в своём посте. В результате с русской версией - те же проблемы, а английская установилась нормально. Руки опускаются. Поможете?
А зачем вы устанавливаете заново всю программу? Установите языковой пакет (Language Pack) и все, будет у вас русский Inventor
Попробовал так сделать. увы, пишет, что уже установлен Пакет для локализации. ((((
В самом AutoCAD есть что то подобное, но маленькое не неудобное окошечко, с подвигло меня для написания собственной программы.
Данная программа предназначена для работы в среде Windows. При работе используется позднее связывание, так что по идее должно работать со всеми версиями AutoCAD и Word.
Надеюсь Вам пригодится, и это не велосипед
Работоспособность - данная программа тестировалось с версиями AutoCAD 2010г,2011г,2012г,2016г а также Microsoft Office Word 2010/2016.
При работе используется позднее связывание, так что по идее должно работать со всеми версиями AutoCAD и Word.
(если одновременно установлено на одной машине компас и AutoCAD то есть вероятность того что работать не будет,
Также скорее всего не совместимо с AutoCAD LT/Lite и прочими урезанными версиями)
Главное окно программы - таблица состоящая с листами, для удобства работы с несколькими чертежами одновременно.
При работе с AutoCAD используется данные с активного листа
При работе с Word используется данные с активного документа
Меню: Файл
Загрузить из файла - загружает собственно сохраненный файл.
Сохранить как - сохраняет данные таблицы в файл по выбору пользователя
Меню: Инструменты
очистить - очистить всю данные в таблице
-
Запись в DWG - записывает в активный открытый документ AutoCAD "пользовательские свойства документа" из активной таблицы.
Получить из DWG - считывает из активного открытого документа AutoCAD данные из "пользовательских свойств документа", и заполнение этими данными активную таблицу в программе.
-
Запись в DOC - записывает в активный открытый документ WORD "DocProperty" из активной таблицы.
Получить из DOC - считывает из активного открытого документа WORD "DocProperty", и заполняет этими данными активную таблицу в программе.
-
Записать во все файлы в директории.. - записывает "пользовательские свойства документа" и "DocProperty" из активной таблицы в выбираемом каталоге с подкаталогами во ВСЕ найденные файлы с типом расширения *.dwg,*.doc,*.docx.
Кнопки:
Запись в DWG - записывает в активный открытый документ AutoCAD "пользовательские свойства документа" из активной таблицы.
Получить из DWG - считывает из активного открытого документа AutoCAD данные из "пользовательских свойств документа", и заполнение этими данными активную таблицу в программе.
Запись в DOC - записывает в активный открытый документ WORD "DocProperty" из активной таблицы.
Получить из DOC - считывает из активного открытого документа WORD "DocProperty", и заполняет этими данными активную таблицу в программе.
Всплывающее меню:
Добавить строку - Добавляет строчку
Удалить строку - Удаляет строчку
-
Вверх - Перемещает строку вверх
Вниз - перемещает строку вниз
-
Очистить таблицу - Удаляет все записи в таблице
-
Отменить изменения - Отменяет последнее изменение
Работа с листами:
- Настройки листов сохраняются при закрытии программы
- Можно добавить новый лист
- Удалить активный лист
- Переименовать активный лист
Принцип работы:
- при записи в автокад или в ворд програма вначале удаляет все ключи потом добавляет новые.
- Обновление в Word должно произойти автоматически после нажатия кнопки "запись в DOC".
- Обновление в Autocad должно произойти автоматически после нажатия кнопки "запись в DWG".
Дополнительно:
- Возможность сохранить в некоторые форматы файла (*.txt, *.bin, *.csv, *.xls, .html, *.doc)
- Возможность загрузки из файлов некоторых форматов файла (*.txt, *.bin, *.csv, *.xls)
- Возможность выбрать стиль оформления внешнего вида программы. Настройки окна сохраняются в текстовом файле в каталоге с программой.
Может кто-нибудь подсказать, как искоренить макрос из файла? В списке макросов, вроде, пусто. А при загрузке файла всё равно "вякает" : disable, enable, don`t load. Можно просто игнорировать, но уж больно раздражает.
А поподробнее, что он вякает, можно. Что за макрос?
Да просто какой-то макрос в файле был, то ли пустой, то ли недоудаленный. вроде, я вылечил его уже.
там через vbarun, VBA manager, в окошке projects просто удалил имя проекта и больше его не стало. а "вяканье" - это при загрузке файла было, типа защита от вирусов.
Выполнить следующую строку:
(dictremove (namedobjdict) "ACAD_VBA")
> MS:
А у меня что-то нету такой команды. (
(dictremove) где её найти?
> Bonsl
у меня что-то нету такой команды. (
(dictremove) где её найти?
такого не может быть, если речь идет о нормально установленном (полном, а не LT) Акаде. dictremove - функция Lisp-а, которая доступна всегда (если конечно кто-то не переопределил ее злонамеренно. )
У меня 2004 полная версия с экспрессом, и с командной строки данная функция не берется.
правда вот до Лиспа мне пока еще далековато . ) чайник я еще..
в принципе, пока хватает чертить и так.
> Bonsl
а пробовал просто повторить указанную MS строку (один в один). Что-то мне кажется что Лисп ставится по умолчанию с Автокадом, или я уже забыл.
В догонку, а попробуй в коммандной строке набрать (+ 1 1).
неа.
не берет ни dictremove, ни (+1 1).
правда на единички сказал:"; error: bad function: 1",
а на (dictremove (namedobjdict) "ACAD_VBA") сказал:"nil". )
мож чё не то у меня? устанавливал, вроде, стандартно, потом экспресс привесил и всё.
Какая версия АКАДа?
Пардон!. не заметил версию :(
> Bonsl
> Сергей Попадьин
(+ пробел 1 1)
Ура! Сказал, что "2" . ) значит, не всё потеряно.
а вот про эти вещи, которые Вы мне рассказываете, типа калькулятора и еще чего-то, откуда можно инфу почерпнуть? Книжка есть по 2002-му Акаду, раздел вспомогательных команд покопать, или это не из этой области?
Почти (или большинство) все книги про АКАД затрагивают и язык программирования ЛИСП, Дизель-выражения. Посмотри там есть чуток
Затем обрати внимание на книги типа AutoLISP язык программирования в среде AutoCAD (или похожие назвния)
Там уже примеры прграммирования и тп
Интересует как можно через вба в автокаде сделать автозамену. Для примера в ворде это выглядит так:
Sub Макрос1()
W.Selection.Find.ClearFormatting()
W.Selection.Find.Replacement.ClearFormatting()
With W.Selection.Find
.Text = 111
.Replacement.Text = 222
.Forward = True
.Wrap = wdFindContinue
End With
W.Selection.Find.Execute(Replace:=wdReplaceAll)
End Sub
Если речь идет о замене одной строки текста на другую, то:
-сформировать selectionset
-пройтись по всем объектам в selectionset и если текст равен искомому, то заменить на то, что нужно.
Варианты :
брать все объекты в чертеже или выбирать на экране
брать только TEXT или и MTEXT.
Пример - берутся только объекты TEXT, область поиска указывает пользователь.
Если надо искать во всем чертеже, то вместо
Выдает ошибку: Compile error: Syntax error и выделяет строку For each ent sset
Советую азы VBA поучить, в частности, циклы.
А как их выучить, только по примерам?
П.С. выдает ошибку: "Object required", а когда второй раз задаешь выдает ошибку: "именной набор объектов уже существует"
Sorry, торопился, надергал из разных примеров, имена наборов получились разные.
Надо вместо
Павел]
когда второй раз задаешь выдает ошибку: "именной набор объектов уже существует"
Из-за ошибки программа не доходит до конца, где происходит удаление набора.
При повторном запуске код пытается создать новый набор с существующим именем.
В начале программы рекомендую поместить:
А как их выучить, только по примерам?
Книг по VBA полно, в т.ч. для скачивания в инете.
О спасибо огромное Anatoly и Дмитрий. Оба варианта прекрасно работают. Но в варианте Анатолия заменяет только TEXT, или MTEXT если заменить в строке: dataValue(0) = "TEXT", но как сделать что бы менял сразу все я не разобрался.
Так же в обоих вариантах меняет по всему чертежу и в листах, но не меняет в блоках.
П.С. а какой лучше мне начать изучать язык для подобных задач, VB или LISP? А то знакомый программист советует если начинать изучать программирование, то сразу с С++.
Так же в обоих вариантах меняет по всему чертежу и в листах, но не меняет в блоках.
В блоках (если только это не динамический блок) текст (и все остальное) изменить нельзя (не считая масштаб, цвет и т.д.).
См. какую-нибудь книжку по автокаду (прежде, чем программировать хорошо бы с автокадом более-менее разобраться).
Можно менять аттрибуты в блоке.Вот пример чтения атрибутов.
В блоках (если только это не динамический блок) текст (и все остальное) изменить нельзя (не считая масштаб, цвет и т.д.).
Но ведь через стандартную автозамену можно менять и в блоках.
Да еще вопрос, по поводу того как через макрос менять текст в колонтитулах. Я использую такой макрос:
Sub test()
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageFooter
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = "111"
.Replacement.Text = "222"
.Forward = True
.Wrap = wdFindContinue
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub
но он в место того что бы менять, только активирует колонтитул.
В блоках (если только это не динамический блок) текст (и все остальное) изменить нельзя
С чего Вы взяли, все там можно менять
Дмитрий, огромное вам спасибо! Это то, что нужно:)
С чего Вы взяли, все там можно менять
Вы же описание блока переопределяете, а я писал про BlockReference
Вы же описание блока переопределяете, а я писал про BlockReference
Ну значит я Вас не правильно понял, извиняюсь. Да я изменил описание блока, и сделав регенерацию для чертежа, переопределил все вхождения блоков в соответствии с новым описанием. Судя по всему автора темы это устроило
По-моему так лучше не делать, ибо это ведет к появлению в разных чертежах блоков с одинаковым именем, но разных по описанию.
А потом копируют блок из одного чертежа в другой и долго удивляются что случилось с блоком.
Не совсем понял, что означает "описание блока", то есть, если я поменяю в одном блоке то в других таких же блоках может не поменяться текст?
Вот про описание блока (Block Definition) и про вставку блока (BlockReference)
Blocks and Block References
The Block object represents a block definition, which contains a name and a set of entities.
Block objects have two elements:
• A block definition, which is the abstract database structure that defines a Block
object’s entities
• A block reference (or block insertion), which is the actual insertion in a drawing
Changing a block definition also changes every block reference in the drawing.
Тему читают: 1 гость
Форумы CADUser → Программирование → VBA → Как выглядит программно на VBA автозамена текста в автокаде
К активному документу (рисунок AutoCAD) можно обратиться, используя ThisDrawing в VBA, или через свойство ActiveDocument в VB. Поскольку AutoCAD работает одновременно с только одним документом, и этот документ представляет одну базу данных, то активный документ можно использовать как текущую базу данных, так же как текущий документ.
Некоторые объекты в рисунке устанавливают формат, местоположение, или стиль, которые являются новыми объектами, они добавляются в рисунок. Они включают DimensionStyle, TextStyle, Linetype, Viewport, и Layer объекты. Рисунок может содержать многие из этих типов объектов, но одновременно активен может быть только один. Например, может быть несколько типов линии, доступных в рисунке, но только один, определённый как активный, будет использоваться при создании нового объекта. Объект Document содержит ссылки к этим активным объектам. Чтобы установить существующий объект как активный объект, используйте нижеупомянутые свойства.
Объект Document также содержит свойство (или связь) для всех коллекций. Из этих коллекций, вы можете итерацией выбрать любой объект рисунка.
Чтобы обращаться к свойствам рисунка типа Title, Subject, Author и Keywords, должен использоваться интерфейс IAcadSummaryInfo доступный как свойство объекта Document.
Использование Пространства листа и Пространства модели
Через объект Document, Вы управляете параметрами настройки пространства листа и пространства модели. По умолчанию, рисунок открыт в пространстве модели, с установкой неперекрывающегося видового экрана. Используйте свойство ActiveSpace, свойство MSpace и метод Display для управления параметрами настройки пространства листа и пространством модели. Смотри объект PViewport для получения дополнительной информации об использовании этих свойств и методов.
Сброс Активных Объектов
Изменения самых активных объектов, типа активного слоя и активного типа линии, показываются немедленно. Однако, несколько объектов должны быть сброшены для отображения изменений. Эти объекты - активный стиль текста, активный UCS и активная область просмотра. Чтобы сбросить объекты, просто вызовите ActiveTextStyle, ActiveUCS или свойство ActiveViewport, используя модификацию объекта.
Чтобы создавать или открывать объект Document, используйте методы New или Open. Чтобы редактировать или сделать запрос объекта Document, используйте следующие методы и свойства:
Читайте также: