Mas Problemas
Publicado por jma (96 intervenciones) el 25/12/2008 21:19:59
Hola y feliz navidad para todos
en este momento son dos problemas, a ver quien me ayuda....
1. referencia subform en codigo vba
antecedentes:
- un form q contiene 4 subforms del mismo tamaño y sobrepuestos en el diseño
- el form principal contiene un grupo de opciones el control se llama optVistaCarpeta
- el codigo usa la propiedad .Visible de los subforms para que se vea solo el q se ha seleccionado con el control
Private Sub optVistaCarpeta_AfterUpdate()
Select Case Me!optVistaCarpeta
Case 1
Me.sfrm_Carpetas_Solicitudes.Visible = True
Me.sfrm_Carpetas_Garantias.Visible = False
Me.sfrm_Carpetas_Operaciones.Visible = False
Me.sfrm_Carpetas_Pagos.Visible = False
Case 2
Me.sfrm_Carpetas_Solicitudes.Visible = False
Me.sfrm_Carpetas_Garantias.Visible = True
Me.sfrm_Carpetas_Operaciones.Visible = False
Me.sfrm_Carpetas_Pagos.Visible = False
Case 3
Me.sfrm_Carpetas_Solicitudes.Visible = False
Me.sfrm_Carpetas_Garantias.Visible = False
Me.sfrm_Carpetas_Operaciones.Visible = True
Me.sfrm_Carpetas_Pagos.Visible = False
Case 4
Me.sfrm_Carpetas_Solicitudes.Visible = False
Me.sfrm_Carpetas_Garantias.Visible = False
Me.sfrm_Carpetas_Operaciones.Visible = False
Me.sfrm_Carpetas_Pagos.Visible = True
Case Else
Me.sfrm_Carpetas_Solicitudes.Visible = True
Me.sfrm_Carpetas_Garantias.Visible = False
Me.sfrm_Carpetas_Operaciones.Visible = False
Me.sfrm_Carpetas_Pagos.Visible = False
End Select
End Sub
Como ven nada complicado pero igual no me funcionó!
al marcar en una opcion determinada aparece el siguiente mensaje
"Error de compilacion. No se encontró el método o el dato miembro"
refiriendose a Me.sfrm_Carpetas_Solicitudes, que es como crei que se hacia referencia a un formulario, pero un codigo similar sí me funcionó en otro formulario para hacer exactamente lo mismo por eso no entiendo que la referencia este mala.
en este momento son dos problemas, a ver quien me ayuda....
1. referencia subform en codigo vba
antecedentes:
- un form q contiene 4 subforms del mismo tamaño y sobrepuestos en el diseño
- el form principal contiene un grupo de opciones el control se llama optVistaCarpeta
- el codigo usa la propiedad .Visible de los subforms para que se vea solo el q se ha seleccionado con el control
Private Sub optVistaCarpeta_AfterUpdate()
Select Case Me!optVistaCarpeta
Case 1
Me.sfrm_Carpetas_Solicitudes.Visible = True
Me.sfrm_Carpetas_Garantias.Visible = False
Me.sfrm_Carpetas_Operaciones.Visible = False
Me.sfrm_Carpetas_Pagos.Visible = False
Case 2
Me.sfrm_Carpetas_Solicitudes.Visible = False
Me.sfrm_Carpetas_Garantias.Visible = True
Me.sfrm_Carpetas_Operaciones.Visible = False
Me.sfrm_Carpetas_Pagos.Visible = False
Case 3
Me.sfrm_Carpetas_Solicitudes.Visible = False
Me.sfrm_Carpetas_Garantias.Visible = False
Me.sfrm_Carpetas_Operaciones.Visible = True
Me.sfrm_Carpetas_Pagos.Visible = False
Case 4
Me.sfrm_Carpetas_Solicitudes.Visible = False
Me.sfrm_Carpetas_Garantias.Visible = False
Me.sfrm_Carpetas_Operaciones.Visible = False
Me.sfrm_Carpetas_Pagos.Visible = True
Case Else
Me.sfrm_Carpetas_Solicitudes.Visible = True
Me.sfrm_Carpetas_Garantias.Visible = False
Me.sfrm_Carpetas_Operaciones.Visible = False
Me.sfrm_Carpetas_Pagos.Visible = False
End Select
End Sub
Como ven nada complicado pero igual no me funcionó!
al marcar en una opcion determinada aparece el siguiente mensaje
"Error de compilacion. No se encontró el método o el dato miembro"
refiriendose a Me.sfrm_Carpetas_Solicitudes, que es como crei que se hacia referencia a un formulario, pero un codigo similar sí me funcionó en otro formulario para hacer exactamente lo mismo por eso no entiendo que la referencia este mala.
Valora esta pregunta


0