adapt userform loop using control name containing variable for worksheet activex controls

Hi all,

First time posting - I have already gotten a lot of my questions answered here - thanks!

The following code works great to save data from a userform to a database on a worksheet; where my control names are CTRL1, CTRL2 etc. But I haven't figured a way to adapt the code for activex controls I have put on another worksheet(sheet 6) in the same workbook. Any ideas how to loop thru? It does not recognise any combinations I've tried using say: sheet6.OleoObject("CTR" & i).value.
TIA

Sheets("DATABASE").Select
    Range("A" & rw).Activate
    'MsgBox "ACELL IS:" & ActiveCell



'Start loop to add data back to worksheet from userform
i = 1
For i = 1 To cntrl_num ' number of controls on userform
    
    col = i 'equals column address
    'and variable rw equals row address
    'chosen = Cells(rw, 1)
    If Me.Controls("CTRL" & i).Value = Cells(rw, col).Value Then
        'MsgBox "skipping VALUE" & Me.Controls("CTRL" & i)
        Else: Cells(rw, col).Value = Me.Controls("CTRL" & i).Value
    End If
    'Me.Controls("CTRL" & i).Enabled = False
Next i

MsgBox "Record is now updated."

Oops- typo there
Norrie, have tried that - code below shows what I've tried and the errors.................

Sub testvaluereturn()


With Sheet6
    MsgBox .ctr2.Value 'works - returns value
End With

MsgBox Sheet6.OLEObjects("ctr" & 2) '"object doesn't support this property or method"
MsgBox Sheet6.OLEObjects(ctr2) ' "runtime error 1004 method of OleObject failed
MsgBox OLEObjects.ctr2 '"object required"

i = 2
With Sheet6
   MsgBox ("ctr" & i) ' returns ctr2-not value
   MsgBox("ctr" & i).Value  ' invalid qualifier
   
End With

End Sub

Thank you! You solved it like that!
I'm learning slowly but this one had me stumped for sure. The loop works perfectly now. Hope this helps someone else along the way.
Final code below - saves updated record, clears out controls and disables controls:

'Start loop to add data back to worksheet from sheet
i = 1

For i = 1 To cntrl_num ' number of controls on sheet
    
    col = i 'equals column address
    'and variable rw equals row address
    
    If Sheet6.OLEObjects("ctr" & i).Object.Value = Cells(rw, col).Value Then
    ' do nothing
    Else: Cells(rw, col).Value = Sheet6.OLEObjects("ctr" & i).Object.Value
    End If
    Sheet6.OLEObjects("ctr" & i).Object.Value = ""
    Sheet6.OLEObjects("ctr" & i).Object.Enabled = False
Next i