Hi,

How do I change the caption on a label that is on a sheet (not on a form) ?



I've tried:

shp <<< defined as a shape
Code:
    For lngS = 1 To ActiveWorkbook.Sheets.Count
        Set sht = ActiveWorkbook.Sheets(lngS)
        
        On Error Resume Next
        Set shp = sht.Shapes("lblLastMonth")
        shp.Caption = "(May 2012)" 'errors
        shp.TextFrame.Characters.Text = "(May 2012)" ' errors
        On Error GoTo 0
    Next
Any links or how to fix please? (I have the same label on multiple sheets, and want the code to flip through the sheets and change the caption on the label.

Recording a macro doesn't store (the property window must not be recorded).



Thanks in advance