Строка из ячейка как функция в макросе?

Весь MS Office, программирование на Visual Basic for Applications и MS VB

Модератор: Naeel Maqsudov

Ответить
DimsonV
Сообщения: 4
Зарегистрирован: 12 июл 2007, 21:06

Здравствуйте Уважаемые!

Хотелось бы реализовать такую штуку:
В ячейку таблицы есть запись типа "2.1+3*X"
Хотелось бы макросом прочитать эту строку, и главное - вычислить по этой формуле результат, скормив вместо "X" нужное значение.

Возможен ли такой финт ушами?
Genyaa
Сообщения: 310
Зарегистрирован: 11 окт 2006, 17:24
Откуда: Moscow
Контактная информация:

Возможен... есть такой метод Evaluate
Всякое решение плодит новые проблемы.
Avsha
Сообщения: 665
Зарегистрирован: 08 сен 2005, 13:47
Откуда: KZ

еще случай...

С6: 7 - именованный диапазон "X"
E6: =2,1+3*X - 23,1
G6: =RangeToString(E6) - =2,1+3*X

Код: Выделить всё

Public Function RangeToString(r1 As Range)
   Application.Evaluate True
   RangeToString = r1.FormulaLocal
End Function
Ответить