Compile error : object required in userform

Greetings,

I get the subject compile error at the line:

Set sFraName = Fr.Name

The code is:

Private Sub NameEnabledFrame()
    Call CountFrames
    For i = 2 To iCountFra
        Set Fr = Me.Controls("Frame" & i)
            If Fr.Enabled = True Then
                Set sFraName = Fr.Name
            End If
    Next
End Sub

The variables are declared at the top of the userform module after "Option Explicit"

Dim iCountFra As Integer          'Number of frames in the userform
Dim sFraName As String            'Name of the frame enabled as per optionbutton selection
Dim i As Integer
Dim Fr As MSForms.Frame

Can someone please tell me why I am getting the error?

Many thanks
Asha

The error was resolved when I changed the code from:

Set sFraName = Fr.Name

to

sFraName = Fr.Name

I guess that it because "Set" is not to be used for string variables?

Many thanks
Asha