Subtract and multiply as a code ????????

[Tdp]

How You put the following as a vb code:

=SUM(1013-J5)*28

 

[David Biddulph]

I'll let someone else answer the VB question, but as a formula you don't
need the SUM() function.
=(1013-J5)*28 will do.

 

[Gary''s Student]

Sub tdp()
MsgBox ((1035 - Range("J5")) * 28)
End Sub

 

[Mike H]

Hi,

Try this

myvalue = (1013 - Range("J5").Value) * 28

also the worksheet formula should be written like this
=(1013-J5)*28

Mike

 

[Tdp]

Thanks very much,
What I am trying to do is by inserting a value in textbox1, it runs the code
and places the result in textbox2.
Textbox1 is linked to cell sheet1 "A1" and textbox2 is linked to Sheet1 cell
"A2"
I'v tried using formula, but every time I enter a value in textbox1, it
clears the formula in cell "A2"

 

[Mike H]

Hi,

I'm confused but this may point you in the correct direction

Private Sub TextBox1_Change()
TextBox2.Text = (TextBox1.Text - Range("J5").Value) * 28
End Sub

Mike

 

[Tdp]

Mike it did'nt work but I tried the following code:

Private Sub TextBox1_Enter()
TextBox2.Text = (TextBox1.Text - Range("J5").Value) * 28
End Sub
That seems to work. Inserting a figure in textbox1 then by selecting
textbox2 the value changes. That is workable but I was after, as you entered
a value in textbox1....textbox2 changes without having to select textbox2.