VBA Referencing Label object on a sheet

[PaulMarks]

Dear Forum

I am trying to assign a given value to a series of labels (not a form) attached to a number of sheets generically if certain criteria is true

I am experiencing some problems with refereing to these objects using the VBA for each.

I have manged to establish the code for looking at each sheet but not the controls with in the sheet.

Can some one please assist.

Thank you and kind regards

Paul Marks

 

[Andrew Poulsom]

See if this helps you:

Sub Test()
    Dim Ctrl As OLEObject
    For Each Ctrl In ActiveSheet.OLEObjects
        MsgBox "Type: " & TypeName(Ctrl.Object) & vbCrLf & "Name: " & Ctrl.Name
    Next Ctrl
End Sub

 

[PaulMarks]

Thank you so much

With Kind Regards


Paul Marks