i have problem with controls.tag thet i’v 4 labels thet there tags (balance, potpaid, dailyout, dailyin)
I’v wrote some code to get controls with those tags from a collection
On example:
sTag ="Postpaid"
If c.tag = sTag then
On this code c.tag gives thet value on the locals tap
c.tag gives "Postepaide "
That is whole code
Private sub Get_UpdateBars()
Dim c As Control
Dim sTag As Variant
Dim Tag As Variant
Dim obj As Object
Dim upDateBars As UpDate_bar
Set upDateBars = New UpDate_bar
With Me.MultiPage1
For Each c In .Pages(3).Controls
For Each sTag in upDateBars.cNames
If Tag = sTag Then
Set obj = c
Set upDateBars = New UpDate_bar
Set upDateBars.c_label = obj
End If
Next sTag
Next c
End With
End Sub
MoDamEr X is a new contributor to this site. Take care in asking for clarification, commenting, and answering.
Check out our Code of Conduct.