Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
setting a control's text from the value of a cell
Is this possible?
Here's what I'm looking to do. When the excel workbook loads, I want it to: 1. Load the Userform first 2. set the text values of controls to a particular cell's value (not all controls to one cell value). ie. (and this psudo code mixed w/ vb) <code Public Class ThisWorkbook Private Sub ThisWorkbook_Startup(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Startup lblParagraph.Text=ActiveWorkbook.Sheets("MySheet") .Activate Range("A1").Select End Sub Private Sub ThisWorkbook_Shutdown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shutdown End Sub End Class </code Now, I'm using VS2008. When I begin to type my label control from the user form into the startup workbook, it doesn't see the label control in the type ahead. Or does it go in some sort of 'OnUserFormLoad' procedure and the workbook_startup just loads the form? I don't know. Any help would be appreciated. Thanks. |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
setting a control's text from the value of a cell
Although you mention using VS2008, you don't mention which version of Excel
you are using nor is it clear whether you know how to do this within Excel and just need help with the VS syntax, or whether you are looking for help with the Excel object model. I don't have VS2008, so I'll provide a within-Excel solution here to give you the syntax; hopefully that is what you need and you can adjust it to meet your specific project requirements. Private Sub Workbook_Open() UserForm1.Label1.Caption = Sheet1.Range("A1").Value UserForm1.Label2.Caption = Sheet1.Range("A2").Value UserForm1.Show End Sub HTH, Keith "Nondisclosure007" wrote: Is this possible? Here's what I'm looking to do. When the excel workbook loads, I want it to: 1. Load the Userform first 2. set the text values of controls to a particular cell's value (not all controls to one cell value). ie. (and this psudo code mixed w/ vb) <code Public Class ThisWorkbook Private Sub ThisWorkbook_Startup(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Startup lblParagraph.Text=ActiveWorkbook.Sheets("MySheet") .Activate Range("A1").Select End Sub Private Sub ThisWorkbook_Shutdown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shutdown End Sub End Class </code Now, I'm using VS2008. When I begin to type my label control from the user form into the startup workbook, it doesn't see the label control in the type ahead. Or does it go in some sort of 'OnUserFormLoad' procedure and the workbook_startup just loads the form? I don't know. Any help would be appreciated. Thanks. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
setting a control's text from the value of a cell
I'm sorry about that Ketih, It's Excel 2003.
I was drawing a blank on how to do this in excel. The whole reason I was using VS2008 was simply, and I know this sounds lame, was for the type ahead features. Thank you for below. That will work. I should probably drop VS2008 and just use the VBA editor w/ Excel 2003 to create the form. I don't think VS2008 is getting me anything, from functionality in the form perspective, that the VBA editor in Excel can't. On Oct 8, 4:37*pm, ker_01 wrote: Although you mention using VS2008, you don't mention which version of Excel you are using nor is it clear whether you know how to do this within Excel and just need help with the VS syntax, or whether you are looking for help with the Excel object model. I don't have VS2008, so I'll provide a within-Excel solution here to give you the syntax; hopefully that is what you need and you can adjust it to meet your specific project requirements. Private Sub Workbook_Open() * *UserForm1.Label1.Caption = Sheet1.Range("A1").Value * *UserForm1.Label2.Caption = Sheet1.Range("A2").Value * *UserForm1.Show End Sub HTH, Keith "Nondisclosure007" wrote: Is this possible? Here's what I'm looking to do. *When the excel workbook loads, I want it to: 1. *Load the Userform first 2. *set the text values of controls to a particular cell's value (not all controls to one cell value). ie. (and this psudo code mixed w/ vb) <code Public Class ThisWorkbook * * Private Sub ThisWorkbook_Startup(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Startup * * * * *lblParagraph.Text=ActiveWorkbook.Sheets("MySheet" )..Activate * * Range("A1").Select * * End Sub * * Private Sub ThisWorkbook_Shutdown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shutdown * * End Sub End Class </code Now, I'm using VS2008. *When I begin to type my label control from the user form into the startup workbook, it doesn't see the label control in the type ahead. *Or does it go in some sort of 'OnUserFormLoad' procedure and the workbook_startup just loads the form? I don't know. Any help would be appreciated. *Thanks.- Hide quoted text - - Show quoted text - |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
VB control's text/caption is ugly - keeps resizing | Excel Programming | |||
Setting the text in a cell to the text of a cell on a different sheet in the same workbook | Excel Programming | |||
Setting the Chart name as the text from a cell. | Excel Programming | |||
Setting spaces between text in a cell | Excel Programming | |||
Setting text as a background in cell | Excel Worksheet Functions |