Problema código Access 2013 tipo de control

Buenos días. Estoy usando este código de neckkito para seguir los cambios en formularios.

Public Sub recojoDatos(vForm As Form)
'Creo una instancia de la colección
Set cContenidos = New Collection
'Recorremos los controles del formulario
For Each ctl In vForm.Controls
'Si el tipo de control es el especificado cogemos su nombre y su valor
If ctl.ControlType = acTextBox Or ctl.ControlType = acListBox _
Or ctl.ControlType = acComboBox Or ctl.ControlType = acOptionGroup Then
cContenidos.Add ctl.Name
cContenidos.Add Nz(ctl.Value, "")
End If
'Si el tipo de control es un checkBox transformamos su valor
If ctl.ControlType = acCheckBox Then
cContenidos.Add ctl.Name
If ctl.Value = True Then
cContenidos.Add "TRUE"
Else
cContenidos.Add "FALSE"
End If
End If
Next ctl
End Sub 'Fin recojoDatos()

El problema es que solo funciona en campo tipo texto, no en el resto, dando error de "no coinciden los tipos", deteniéndose siempre en cconteniddos Add NZ

Por más que reviso y modifico no encuentro el error

¿podríais ayudarme?

Muchas Gracias

Añade tu respuesta

Haz clic para o