Error al Guardar Información de un Label

[jues]

Saludos amigos espero estén bien
Intento guardar la información proveniente del Label32 a través de la siguiente sección de código:

Guardar Hoja58, "H3", Label32

Sin embargo, al ejecutar la macro se inserta una fila como corresponde, pero no se copia ninguna información en la MATRIZ4 apareciendo de inmediato una alerta que me indica: “Se ha producido un error ”438” entiempo de ejecución: El objeto no admite esta propiedad o método” ubicando el error en la siguiente macro:

If ctrl.Visible Then
        sh.Range(r).Value = ctrl.Value
    End If

End Sub

Por lo que entiendo se debe a la propiedad Vaule que no sé cómo ni por cual propiedad cambiar para que se guarde correctamente la información del Label32 conjuntamente con el resto de los TextBox y ComboBox.

GUARDAR PRUEBA.xlsm

[jues]

[Antoni]

No todos los controles tienen las mismas propiedades:

Private Sub Guardar(sh As Worksheet, r As String, ctrl As Control)
If ctrl.Visible Then
   Select Case TypeName(ctrl)
      Case "Label"
         sh.Range(r).Value = ctrl.Caption
      Case "TextBox"
         sh.Range(r).Value = ctrl.Value
   End Select
End If
End Sub

 

[jues]

Funciona exelente muchas gracias