Tengo un error 424 " se requiere un objeto"
Para Dante. Dante por favor ayúdame con este error que no lo encuentro. Esta en el UserForm 2.
Te envío el archivo a tu correo.
1 Respuesta
Respuesta de Dante Amor
1
H o l a:
En el evento Initialize, estás cargando los meses al combo "MES", pero no existe el combo "MES" en el userform, tampoco existe el combo "ANO", tienes que crear ambos combos en el userform.
Private Sub Userform_Initialize()
Set H2 = Sheets("Usuarios")
For I = 2 To H2.Range("A" & Rows.Count).End(Xlup).Row
Combobox1.Additem H2.Cells(I, "A")
Next
Clases. Additem "Adrenaline"
Clases. Additem "Zumba"
Clases. Additem "Zumba Kids"
Clases. Additem "Trx"
Clases. Additem "Sala De Musculación"
Clases. Additem "Dos Clases"
Nclases. Additem "8 Clases"
Nclases. Additem "12 Clases"
Nclases. Additem "Full"
Nclases. Additem "Otros"
Mes. Additem "Enero"
Mes. Additem "Febrero"
Mes. Additem "Marzo"
Mes. Additem "Abril"
Mes. Additem "Mayo"
Mes. Additem "Junio"
Mes. Additem "Julio"
Mes. Additem "Agosto"
Mes. Additem "Septiembre"
Mes. Additem "Octubre"
Mes. Additem "Noviembre"
Mes. Additem "Diciembre"
Ano. Additem "2015"
Ano. Additem "2016"
Ano. Additem "2017"
Cantidad. Additem "18,000"
Cantidad. Additem "22,000"
Cantidad. Additem "30,000"
Cantidad. Additem "32,000"
Cantidad. Additem "Otro Valor"
End Subsal u dos
