Vba+autocad+excel

Тема в разделе "Visual Basic", создана пользователем dmalsh, 20 апр 2009.

  1. dmalsh

    dmalsh New Member

    Регистрация:
    20 апр 2009
    Сообщения:
    4
    Симпатии:
    0
    В документе Autocad вставлен OLE объект - лист Excel.
    Как средствами VBA получить данные из таблицы Excel?
     
  2. Jumpy

    Jumpy Гость

    А что значит "получить данные" ?

    обращаться к данным (внутри excel) надо так:
    stroka = Лист1.range("A1")
    в переменную stroka запишутся данные в ячейке A1 с Лист1

    или так:
    stroka = Лист1.cells(1,1)
    обратите внимание - в первом случае указывается в двойный кавычках (ибо адрес ячейки указан строкой), а во втором - 2мя числами через запятую (это грубо говоря координаты строки/столбца)

    но (!) если Вам требуется получить данные из экселя обращаясь к нему из внешней среды - там будет другой синтаксис (на память не скажу).
     
  3. dmalsh

    dmalsh New Member

    Регистрация:
    20 апр 2009
    Сообщения:
    4
    Симпатии:
    0
    Наверно я некорректно задал вопрос.
    Нужен доступ из VBA к OLE объекту (таблице Excel) в документе Autocad.
     
  4. etc

    etc Гость

    По средствам позднего или раннего связывания.
     
  5. dmalsh

    dmalsh New Member

    Регистрация:
    20 апр 2009
    Сообщения:
    4
    Симпатии:
    0
    А можно пример?
     
  6. 495

    495 Гость

    Добрый день. Есть у меня программа в Автокаде 14 по расчету алюминиевого профиля. Она сохраняет спецификацию в txt. файле. Далее txt файл открываем в Экселе и с помощю макросов просчитывается общее кол-во материала. На выходе получаем xls документ со всем необходимыми параметрами.
    Техзадание следующего плана:
    1. Убрать лишние(неиспользуемые) кнопки в Автокаде 14
    2. Переименовать кнопки по новым наименованиям материала(сейчас подразумеваем под старыми новые значение материала)
    3. Поправить в макросах название товара.
    На данный момент приходится править xls. документ, менять старые обозначения на новые(ДСП 5мм на ДСП 6мм, к примеру).


    Собственно, работа корректорского характера. Кто бы мог взяться и реализовать за умеренную плату? Работы не много, как видите:)
     

Поделиться этой страницей