[RESUELTO] error de basic

[sherlockh]

hola, buenas tardes desearía a ver si me podéis ayudar al aplicar una macro de un combobox con imagenes me aparece este error lo he revisado, funciona perfecto, pero salta el error cada vez que ejecuto la macro,, además necesitaría que se limpiase al cambiar de registro. Dejo la base en la que trabajo, en la que hay un poco de todos porque muchas ideas son vuestras.

https://drive.google.com/drive/folders/ ... sp=sharing

[mauricio]

La imagen no se alcanza a ver...

[RMG]

Hola,

Como dice Mauricio, la imagen no se ve bien, pero he descargado el ejemplo y el problema es que tienes asignada una macro al formulario alergenos, dentro de recetas, pasa todos los datos de los combobox a recetas y eliminas alergenos, ya que este formulario por lo que intuyo, no vas a cambiar de registro. Después pones esta macro tras cambio registro en recetas, para que ponga todo a blanco.
Además de este formulario innecesario tienes otros que no hacen falta, cuanto de más recursos hagas uso en la BD, más lenta funcionará.

Código: Seleccionar todo   Expandir vistaContraer vista

Sub ImagenBlancoCbo (Evento)
Evento.Source.getByName("img1").ImageURL = ""
Evento.Source.getByName("cbo1").Text = ""
Evento.Source.getByName("img2").ImageURL = ""
Evento.Source.getByName("cbo2").Text = ""
Evento.Source.getByName("img3").ImageURL = ""
Evento.Source.getByName("cbo3").Text = ""
Evento.Source.getByName("img4").ImageURL = ""
Evento.Source.getByName("cbo4").Text = ""
Evento.Source.getByName("img5").ImageURL = ""
Evento.Source.getByName("cbo5").Text = ""
Evento.Source.getByName("img6").ImageURL = ""
Evento.Source.getByName("cbo6").Text = ""
End Sub

Saludos

[sherlockh]

Perdón, creo que la he mejorado algo. He leído varios recursos del foro pero mi formulario si existe.

pero, si no se lee todavia es Error de Basic
se ha producido una excepcion.
Type.com.sum.star.container. NoSuchElementException
Message.
y va a la linea txtImagen = Evento.Source.getByName("alergeno")

[mauricio]

El formulario tal vez, lo que dice el error es que alergeno es el que no existe. Dependiendo en que evento hayas relacionado la macro, Evento.Source pueden ser diferentes objetos.

¿Ya revisaste lo que te comento mi amigo RMG?

[sherlockh]

Estoy en ello

[RMG]

Hola,

No has entendido lo que te explico. El mensaje de error es por que no encuentra el control (container), en este caso el campo texto alergeno, y esto sucede por que has puesto la macro del formulario FormALERGENOS (tras cambio registro) a un formulario interno en FormRECETAS llamado SubformALERGENOS. Este subformulario es el que hace que se dispare el error de la macro ya que no encuentra el control "alergeno". Quitale esa la macro y lo comprobarás.

Saludos

[sherlockh]

Excelente, va perfecto