All Forums
 Категория Visio
 Форум Вопросы и ответы
 Переменные макроса в формуле ячейки шейплиста!
Author Previous Topic Topic Next Topic  

yabes

39 Posts
Posted - 04/23/2009 :  12:45:07
Добрый день всем! Очень нужна ваша помощь!
Возьмем простой отвлеченный пример:
Есть вертикальная линия. Допустим по двойному нажатию по ней запускается макрос. В макросе напишем простой цикл: от а=1 до N, EndX линии уменьшается на значение "а".
Set shpObj = ActiveWindow.Selection(1)
For a=1 To N
   shpObj.CellsSRC(visSectionObject, visRowXForm1D, vis1DEndY).FormulaU = "EndY- .......
Next a

Вопрос вот в чем: Можно ли использовать переменные из макросов в написании формул для ячеек ШейпЛиста??? Что писать вместо точек!?

И еще очень важный второй вопрос: Как в ячейку шейплиста поместить не саму формулу, а ЗНАЧЕНИЕ этой формулы, чтобы при изменении впоследствии составляющих элементов этой формулы, значение в ячейке не менялось!!!!

GDK

Russia
90 Posts
Posted - 04/27/2009 :  10:14:46
1.
shpObj.CellsSRC(visSectionObject, visRowXForm1D, vis1DEndY).FormulaU = "=EndY-" & a & "mm"

2. И ещё ...
shpObj.CellsSRC(visSectionObject, visRowXForm1D, vis1DEndY).FormulaU = "=guard(" & a & "mm)"

Как то так, но сам не проверял - влом.
Edited by - GDK on 04/27/2009 10:18:08
Go to Top of Page

yabes

39 Posts
Posted - 04/27/2009 :  11:24:20
Спасибо огромнейшее!!! У меня просто руки опускались, когда я не знал ответа на этот вопрос! Спасибо!
Go to Top of Page
  Previous Topic Topic Next Topic  
Данный сайт является архивом форума visio.artberg.ru, который был закрыт в связи с переходом на новую платформу visio.getbb.ru
Все материалы доступны только для чтения! Если у вас появились вопросы, или вы хотите что-то обсудить, связанное с Visio, обращайтесь на новый форум!
Архив был создан благодаря совместным усилиям Генадия Туманова @Tumanov (visio.artberg.ru), Александра ака @Surrogate (visio.getbb.ru), и Николая Белых @nbelyh (unmanagedvisio.com)