Виталий Чумаченко
Посетитель
Всего сообщений: 18
Дата регистрации: 28.04.2011
|
Создано:
03.05.2011 14:11:59
|
Здравствуйте!
Подскажите пожалуйста, как в макросе прописать вывод таблицы контролируемых величин в excel?
И ещё вопрос. Как создать макрос поиска, к примеру ветви, по номерам начала и конца, считанных из файла?
|
Михаил Реутов
Постоянный посетитель
Всего сообщений: 224
Дата регистрации: 21.11.2007
|
Создано:
03.05.2011 15:07:44
|
| Цитата |
|---|
Виталий Чумаченко пишет:
Подскажите пожалуйста, как в макросе прописать вывод таблицы контролируемых величин в excel? |
Экспорт данной таблицы в csv и открытие в excel-е.
| Цитата |
|---|
Виталий Чумаченко пишет:
Как создать макрос поиска, к примеру ветви, по номерам начала и конца, считанных из файла? |
Например так
| Код |
|---|
ip = 1: iq = 3: np = 1 'номера начала, конца и (обязательно!) паралелльности ветви
Set v = Rastr.Tables("vetv")
v.SetSel "ip=" & CStr(ip) & "&iq=" & CStr(iq) & "&np=" & CStr(np)
row = v.FindNextSel(-1)
If row <> -1 Then
MsgBox "Найдена ветвь name=" & v.Cols("name").Z(row)
Else
MsgBox "Ветвь не найдена"
End If
|
или так
| Код |
|---|
ip = 1: iq = 3: np = 1
MsgBox "Найдена ветвь name=" & Rastr.Calc("val", "vetv", "name", CStr(ip) & "&iq=" & CStr(iq) & "&np=" & CStr(np))
|
|
Виталий Чумаченко
Посетитель
Всего сообщений: 18
Дата регистрации: 28.04.2011
|
Создано:
03.05.2011 15:19:30
|
Спасибо большое! Это мне очень поможет. И такой вопрос - как в макросе прописать обращение именно к таблице контролируемых величин? К таблицам ветвей и узлов понятно...
|
Михаил Реутов
Постоянный посетитель
Всего сообщений: 224
Дата регистрации: 21.11.2007
|
Создано:
03.05.2011 15:27:41
|
| Цитата |
|---|
Виталий Чумаченко пишет:
И такой вопрос - как в макросе прописать обращение именно к таблице контролируемых величин? К таблицам ветвей и узлов понятно... |
Контролируемые величины-Описание: ots_val
Контролируемые величины-Значения: ots_znach
|
Виталий Чумаченко
Посетитель
Всего сообщений: 18
Дата регистрации: 28.04.2011
|
Создано:
03.05.2011 15:52:15
|
Спасибо!!
|
