ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Accessing a control (https://www.excelbanter.com/excel-programming/400137-accessing-control.html)

Wes

Accessing a control
 
Hi, I've created a number of textboxes using the following code.

For Count = 1 to 30
Set MyTBox = MyControl.Controls.Add("Forms.textbox.1")
With MyTBox
.Width = 150
.Height = 20
.Top = 20 * Count - 13
.Left = 2
.name = "TBox" & Count
.Visible = True
End With
Next

I now want to access say the fifth box (TBox5)

I have a string (BoxName) with the name of the box TBox5 or I could use an
integer variable to indicate that I want the fifth box, but how do I refer to
this box? I tried:

MyTBox.BoxName.value = ... but this does not work,
and I tried:
MyTBox(5).value = ... this too does not work. What am I missing?

Again, thanks for your help in advance!!!




SeanC UK[_2_]

Accessing a control
 
Hi Wes,

As you are creating the TextBoxes on the fly, it's not so easy to address
them in your code. Here is one method you can use:

Dim Cont As Control
For Each Cont In myForm.Controls
If Cont.Name = "TBox5" Then
Cont.Value = "My Value"
End If
Next

I hope this helps,

Sean.
--
(please remember to click yes if replies you receive are helpful to you)


"Wes" wrote:

Hi, I've created a number of textboxes using the following code.

For Count = 1 to 30
Set MyTBox = MyControl.Controls.Add("Forms.textbox.1")
With MyTBox
.Width = 150
.Height = 20
.Top = 20 * Count - 13
.Left = 2
.name = "TBox" & Count
.Visible = True
End With
Next

I now want to access say the fifth box (TBox5)

I have a string (BoxName) with the name of the box TBox5 or I could use an
integer variable to indicate that I want the fifth box, but how do I refer to
this box? I tried:

MyTBox.BoxName.value = ... but this does not work,
and I tried:
MyTBox(5).value = ... this too does not work. What am I missing?

Again, thanks for your help in advance!!!




Bob Phillips

Accessing a control
 
Just use

Me.Controls("TBox5").Text = ...

--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)



"Wes" wrote in message
...
Hi, I've created a number of textboxes using the following code.

For Count = 1 to 30
Set MyTBox = MyControl.Controls.Add("Forms.textbox.1")
With MyTBox
.Width = 150
.Height = 20
.Top = 20 * Count - 13
.Left = 2
.name = "TBox" & Count
.Visible = True
End With
Next

I now want to access say the fifth box (TBox5)

I have a string (BoxName) with the name of the box TBox5 or I could use an
integer variable to indicate that I want the fifth box, but how do I refer
to
this box? I tried:

MyTBox.BoxName.value = ... but this does not work,
and I tried:
MyTBox(5).value = ... this too does not work. What am I missing?

Again, thanks for your help in advance!!!







All times are GMT +1. The time now is 12:06 PM.

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