Código erroneo en cuadro combinado de formulario

14/01/2006 - 21:35 por ~jose~ | Informe spam
Hola,
tengo un cuadro combinado (llamado Formato) en un formulario,
le he creado este código pero no me funciona,

If Formato Then Range("d11") = Formato

lo he puesto en el código del boton y tambien por probar en el código del
change
Que hago mal?
PD: Formato seria texto.
Un saludo

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
15/01/2006 - 09:07 | Informe spam
hola, jose !

tengo un cuadro combinado (llamado Formato) en un formulario, le he creado este codigo pero no me funciona,
If Formato Then Range("d11") = Formato
lo he puesto en el codigo del boton y tambien por probar en el codigo del change. Que hago mal?
PD: Formato seria texto.



op1: podrias -incluso- 'evitar' el uso de codigo en los eventos del combo [suponiendo que la celda de destino es siempre la misma]...
si estableces su propiedad 'ControlSource' [en la ventana de propiedades / editor de vba] -> a la celda de destino [p.e. d11]
-> si la hoja [donde se pone 'el dato'] NO es la hoja 'activa' [cuando se muestra el formulario]...
-> puedes asignar un nombre a la celda 'correspondiente' -aun si es de otra hoja- p.e. 'destino' -?-

op2: puedes 'depositar' EN la celda de destino 'directamente' la seleccion del combo -> en el evento '_change' [p.e.]
Private Sub ComboBox1_Change()
Range("d11") = ComboBox1 ' o... -> Worksheets("otra hoja").Range("d11") = ComboBox1
End Sub

con relacion a 'la forma' como estas 'condicionando' el codigo... [creo que] ya KL te ha hecho algunos comentarios -?-

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.
Respuesta Responder a este mensaje
#2 ~ jose ~
15/01/2006 - 11:38 | Informe spam
Muy bien, tabien funciona bien y muy simple
gracias otra vez
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida