Buen día Mi pregunta es porque me sale un error de compilación en excel cuando ingreso el sig. Codig
El siguiente código se supone que es para en mi hoja de excel me aparezca un User Form para ingresar unos datos a una base la cual estoy ejecutando con una imagen
pero no se porque me aparece el error de compilación me podrían ayudar, anexo los códigos.
Private Sub Agregar_click() ( esta parte aparecen en amarillo)
Dim iFila As Long
Dim ws As Worksheet
Set ws = Worksheets(2)
End Sub
'Encuentra la siguiente fila vacía
iFila = ws.Cells(Row.Count, 1).End(xlUp).Offset(1, 0).Row ( El numero 1 esta en azul)
'Verifica que se ingrese un Nombre
If Trim(Me.Registration.Value) = "" Then
Me.Registration.SetFocus
MsgBox "debo ingresar el nombre del cliente"
Exit Sub
End If
'Ingresa los Datos a la Base de Datos
ws.Cells(iFila, 1).Value = Me.Registration.Value
ws.Cells(iFils, 2).Value = Me.Aircraft.Value
ws.Cells(iFila, 3).Value = Me.Client.Value
ws.Cells(iFila, 4).Value = Me.Address.Value
ws.Cells(iFila, 5).Value = Me.Estado.Value
ws.Cells(iFila, 6).Value = Me.Ciudad.Value
ws.Cells(iFila, 7).Value = Me.CP.Value
ws.Cells(iFila, 8).Value = Me.RFC.Value
'Limpia el Formulario para ingresar el siguiente dato
Me.Registration.Value = ""
Me.Aircraft.Value = ""
Me.Client.Value = ""
Me.Address.Value = ""
Me.Estado.Value = ""
Me.Ciudad.Value = ""
Me.CP.Value = ""
Me.RFC.Value = ""
Me.Registration.SetFocus
End Sub