Страницы: 1
RSS
Формула в форме
 
Может кто подскажет, как через VBA в поле формы указывать не значение, а формулу. А в результате в другом поле получать значение?  
 
Например поле1:"=28500+50/2"   поле2:"28525"
 
Скачайте этот файл: http://excelvba.ru/XL_Files/Sample__06-11-2009__17-35-35.zip  
и запустите его  
 
В первое поле формы введите формулу  
Во втором автоматически будет отображаться результат вычисления
 
{quote}{login=The_Prist}{date=06.11.2009 03:31}{thema=}{post}Label1.Caption = "поле1:" & Cells(1, 3).Formula & vbCrLf & "поле2:" & Cells(1, 3).Value{/post}{/quote}  
 
ВИДИМО, Я НЕПРАВИЛЬНО ЗАДАЛ ВОПРОС.  
Смысл такой, что в поле1 руками пишешь формулу, а в поле2 появляется результат.
 
{quote}{login=EducatedFool}{date=06.11.2009 03:35}{thema=}{post}Скачайте этот файл: http://excelvba.ru/XL_Files/Sample__06-11-2009__17-35-35.zip  
и запустите его  
 
В первое поле формы введите формулу  
Во втором автоматически будет отображаться результат вычисления{/post}{/quote}  
 
СПАСИБКИ!!!!
 
EducatedFool, ошибка не генерится.  
Может так лучше:  
Private Sub TextBox1_Change()  
   res = Application.Evaluate(Me.TextBox1.Value)  
   Me.TextBox2.Value = CStr(res)  
   Me.TextBox2.BackColor = IIf(IsError(res), vbRed, vbWhite)  
End Sub
Bite my shiny metal ass!      
Страницы: 1
Читают тему
Наверх
Loading...