ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Please help... real simple question... (https://www.excelbanter.com/excel-programming/422427-please-help-real-simple-question.html)

[email protected]

Please help... real simple question...
 
Hey,

I am trying to refrence the name of an object on my userform... I have
setup a combobox with the values 1 - 10... the end result is when
someone selects a value it creates the the string of text "TextBox" &
X (X = number selected from combobox). I then have code that I want to
select that object based on the value of generated... any help is
greatly appreciated!!!

Private Sub ComboBox2_Change()
UserForm1.TextBox8.Value = "TextBox" & ComboBox2.Value
End Sub

Private Sub CommandButton14_Click()
Dim ZoneX As String
ZoneX = UserForm1.TextBox8.Value
ZoneX.SetFocus
End Sub

Why does this not work?

Jim Cone[_2_]

Please help... real simple question...
 
Hey yourself,
It doesn't work because you are trying to set focus to a String.
SetFocus applies to objects. Try...
Me.Controls(ZoneX).SetFocus
--
Jim Cone
Portland, Oregon USA




wrote in message
Hey,
I am trying to refrence the name of an object on my userform... I have
setup a combobox with the values 1 - 10... the end result is when
someone selects a value it creates the the string of text "TextBox" &
X (X = number selected from combobox). I then have code that I want to
select that object based on the value of generated... any help is
greatly appreciated!!!

Private Sub ComboBox2_Change()
UserForm1.TextBox8.Value = "TextBox" & ComboBox2.Value
End Sub

Private Sub CommandButton14_Click()
Dim ZoneX As String
ZoneX = UserForm1.TextBox8.Value
ZoneX.SetFocus
End Sub

Why does this not work?

Dave Peterson

Please help... real simple question...
 
Maybe...

Private Sub ComboBox2_Change()
'Me is a keyword that refers to the object that owns the code.
'in this case, it's the userform
Me.TextBox8.Value = me.controls("TextBox" & me.ComboBox2.Value).value
End Sub



wrote:

Hey,

I am trying to refrence the name of an object on my userform... I have
setup a combobox with the values 1 - 10... the end result is when
someone selects a value it creates the the string of text "TextBox" &
X (X = number selected from combobox). I then have code that I want to
select that object based on the value of generated... any help is
greatly appreciated!!!

Private Sub ComboBox2_Change()
UserForm1.TextBox8.Value = "TextBox" & ComboBox2.Value
End Sub

Private Sub CommandButton14_Click()
Dim ZoneX As String
ZoneX = UserForm1.TextBox8.Value
ZoneX.SetFocus
End Sub

Why does this not work?


--

Dave Peterson

[email protected]

Please help... real simple question...
 
On Jan 13, 10:05*pm, Dave Peterson wrote:
Maybe...

Private Sub ComboBox2_Change()
* *'Me is a keyword that refers to the object that owns the code.
* *'in this case, it's the userform
* *Me.TextBox8.Value = me.controls("TextBox" & me.ComboBox2.Value).value
End Sub





wrote:

Hey,


I am trying to refrence the name of an object on my userform... I have
setup a combobox with the values 1 - 10... the end result is when
someone selects a value it creates the the string of text "TextBox" &
X (X = number selected from combobox). I then have code that I want to
select that object based on the value of generated... any help is
greatly appreciated!!!


Private Sub ComboBox2_Change()
UserForm1.TextBox8.Value = "TextBox" & ComboBox2.Value
End Sub


Private Sub CommandButton14_Click()
Dim ZoneX As String
ZoneX = UserForm1.TextBox8.Value
ZoneX.SetFocus
End Sub


Why does this not work?


--

Dave Peterson- Hide quoted text -

- Show quoted text -


Awsome!!! Thanks!


All times are GMT +1. The time now is 06:16 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com