Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
How do you get a VBA code to reference the value of a cell in a worksheet and
use it in an equation? An example of what I'm trying to do is; If you click on "Spring" I want B27=L175. If you click on "Spring w/Liftable" the equation would then be B27=L175-K195. Also, Is there a way to have a text box in a user form to read a cell? So basically I would like the text box to have the same value as what is in K196. Thanks for any help on this in advance. |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Not too sure what you mena by click on spring but generally speaking your
code will look something like this... Sheets("sheet1").range("B27").formula = "=L175" or Sheets("sheet1").range("B27").formula = "=L175-k195" As for the text box a user form will have an initalize event so something like this... Private Sub UserForm_Initialize() TextBox1.Text = Sheets("Sheet1").Range("K196").Value End Sub -- HTH... Jim Thomlinson "Cerberus" wrote: How do you get a VBA code to reference the value of a cell in a worksheet and use it in an equation? An example of what I'm trying to do is; If you click on "Spring" I want B27=L175. If you click on "Spring w/Liftable" the equation would then be B27=L175-K195. Also, Is there a way to have a text box in a user form to read a cell? So basically I would like the text box to have the same value as what is in K196. Thanks for any help on this in advance. |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Thank you for your help and sorry abot the multiple posts
"Jim Thomlinson" wrote: Not too sure what you mena by click on spring but generally speaking your code will look something like this... Sheets("sheet1").range("B27").formula = "=L175" or Sheets("sheet1").range("B27").formula = "=L175-k195" As for the text box a user form will have an initalize event so something like this... Private Sub UserForm_Initialize() TextBox1.Text = Sheets("Sheet1").Range("K196").Value End Sub -- HTH... Jim Thomlinson "Cerberus" wrote: How do you get a VBA code to reference the value of a cell in a worksheet and use it in an equation? An example of what I'm trying to do is; If you click on "Spring" I want B27=L175. If you click on "Spring w/Liftable" the equation would then be B27=L175-K195. Also, Is there a way to have a text box in a user form to read a cell? So basically I would like the text box to have the same value as what is in K196. Thanks for any help on this in advance. |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Sorry to bother but on making the Text box read the same as a cell, I put
Private Sub TextAxLeft_Initialize() TextAxLeft.Text = Range("K198").Value End Sub in and the text box is blank. I assumed that since the sheet is active, I could leave off the sheet reference. Was I wrong in assuming that or did I do something else wrong? Thanks again. P.S. Thanks again for the info on using the cells in a formula. "Jim Thomlinson" wrote: Not too sure what you mena by click on spring but generally speaking your code will look something like this... Sheets("sheet1").range("B27").formula = "=L175" or Sheets("sheet1").range("B27").formula = "=L175-k195" As for the text box a user form will have an initalize event so something like this... Private Sub UserForm_Initialize() TextBox1.Text = Sheets("Sheet1").Range("K196").Value End Sub -- HTH... Jim Thomlinson "Cerberus" wrote: How do you get a VBA code to reference the value of a cell in a worksheet and use it in an equation? An example of what I'm trying to do is; If you click on "Spring" I want B27=L175. If you click on "Spring w/Liftable" the equation would then be B27=L175-K195. Also, Is there a way to have a text box in a user form to read a cell? So basically I would like the text box to have the same value as what is in K196. Thanks for any help on this in advance. |
#5
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
My assumption in answering your question is that you have added a userform to
your spreadsheet. By that I mean you went into the VBE and inserted a userform. You then added a text box to that userform. Let me know if that assumption is incorrect. Assuming it is correct then a userform has a number of events that it tracks. Just above the code window on the left is a drop down of all of the objects associate with the parent object you are in (the userform in this case). Select userform from that drop down. That will add an on click event procedure to your project. On the right is a drop down of all of the events. Select initialize. That adds a inititialize event procedure to your project. You can not change the names of these procedures. That is where you have run into a problem. You changed Private Sub UserForm_Initialize() to Private Sub TextAxLeft_Initialize() which will not work. -- HTH... Jim Thomlinson "Cerberus" wrote: Sorry to bother but on making the Text box read the same as a cell, I put Private Sub TextAxLeft_Initialize() TextAxLeft.Text = Range("K198").Value End Sub in and the text box is blank. I assumed that since the sheet is active, I could leave off the sheet reference. Was I wrong in assuming that or did I do something else wrong? Thanks again. P.S. Thanks again for the info on using the cells in a formula. "Jim Thomlinson" wrote: Not too sure what you mena by click on spring but generally speaking your code will look something like this... Sheets("sheet1").range("B27").formula = "=L175" or Sheets("sheet1").range("B27").formula = "=L175-k195" As for the text box a user form will have an initalize event so something like this... Private Sub UserForm_Initialize() TextBox1.Text = Sheets("Sheet1").Range("K196").Value End Sub -- HTH... Jim Thomlinson "Cerberus" wrote: How do you get a VBA code to reference the value of a cell in a worksheet and use it in an equation? An example of what I'm trying to do is; If you click on "Spring" I want B27=L175. If you click on "Spring w/Liftable" the equation would then be B27=L175-K195. Also, Is there a way to have a text box in a user form to read a cell? So basically I would like the text box to have the same value as what is in K196. Thanks for any help on this in advance. |
#6
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
It worked, Thanks Jim.
"Jim Thomlinson" wrote: My assumption in answering your question is that you have added a userform to your spreadsheet. By that I mean you went into the VBE and inserted a userform. You then added a text box to that userform. Let me know if that assumption is incorrect. Assuming it is correct then a userform has a number of events that it tracks. Just above the code window on the left is a drop down of all of the objects associate with the parent object you are in (the userform in this case). Select userform from that drop down. That will add an on click event procedure to your project. On the right is a drop down of all of the events. Select initialize. That adds a inititialize event procedure to your project. You can not change the names of these procedures. That is where you have run into a problem. You changed Private Sub UserForm_Initialize() to Private Sub TextAxLeft_Initialize() which will not work. -- HTH... Jim Thomlinson "Cerberus" wrote: Sorry to bother but on making the Text box read the same as a cell, I put Private Sub TextAxLeft_Initialize() TextAxLeft.Text = Range("K198").Value End Sub in and the text box is blank. I assumed that since the sheet is active, I could leave off the sheet reference. Was I wrong in assuming that or did I do something else wrong? Thanks again. P.S. Thanks again for the info on using the cells in a formula. "Jim Thomlinson" wrote: Not too sure what you mena by click on spring but generally speaking your code will look something like this... Sheets("sheet1").range("B27").formula = "=L175" or Sheets("sheet1").range("B27").formula = "=L175-k195" As for the text box a user form will have an initalize event so something like this... Private Sub UserForm_Initialize() TextBox1.Text = Sheets("Sheet1").Range("K196").Value End Sub -- HTH... Jim Thomlinson "Cerberus" wrote: How do you get a VBA code to reference the value of a cell in a worksheet and use it in an equation? An example of what I'm trying to do is; If you click on "Spring" I want B27=L175. If you click on "Spring w/Liftable" the equation would then be B27=L175-K195. Also, Is there a way to have a text box in a user form to read a cell? So basically I would like the text box to have the same value as what is in K196. Thanks for any help on this in advance. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Basic Questions | Excel Programming | |||
Basic questions | Excel Discussion (Misc queries) | |||
Basic Pivot Table Questions | Excel Discussion (Misc queries) | |||
2 basic Excel questions for you pro's | Excel Discussion (Misc queries) | |||
EXCEL Visual Basic Questions | Excel Programming |