Buenas tardes:
Tengo un formulario donde incruste un cuadro de página múltiple, y cada página tiene un botón, mediante los cuales voy a la hoja seleccionada, por ejemplo si elijo ir a boletos emitidos me sitúa en la hoja BOLETOS, en la siguiente página del formulario elijo ir a recibos cierra el formulario y seleccionar la hoja RECIBOS, lo mimo con regresos, hasta ahí todo bien, funciona, solo que al estar en la hoja es como si no estaría activada no me permite escribir nada, solo si hago un cambio de hoja de calculo de forma manual, recién activa la hoja.
Cual seria la solución por favor, de que al elegir la hoja mediante el formulario pueda escribir en la misma, sin la necesidad de como les indique cambiar de hoja que hago manualmente que active la hoja y trabajar en ella.
Muchas gracias
Jesús
| Adjunto | Tamaño |
|---|---|
 cajaejem.rar | 399.5 KB |
Utilizas código como:
Sheets("TKT").Select
Mejor prueba con
Sheets("TKT").Activate
Un saludo
Negativo de la misma manera que select, actua activate
Es como si seguiria en la otra hoja y no en la que seleccione
saludos
Jesús
Jesus Martinez Plantarosa
No sé qué puede ocurrirte. A mí me funciona correctamente.
Prueba a poner el Unload.me después del resto:
sheets("LOQUESEA").activate
Range("A1").select
Unload.me
Un saludo
Negativo tampoco lo activa, es como si en forma paralela estaria escribiendo, y no me permite escribir en la hoja seleccionada.
Jesus Martinez Plantarosa
Lo siento, no te puedo ayudar porque a mí tu código tal cual lo subiste me funciona correctamente. ¿Quizás sea por la versión de Excel?
Ojalá Paco o alguien más sepa qué decir.
Un saludo
Gracias
Jesus Martinez Plantarosa
Sólo se me ocurre que puede ser un problema con que Windows no devuelve el foco a Excel, o no del todo
me ha ocurrido en alguna ocasión cuando paso de Excel o Access a Word y luego vuelvo al programa principal, pero el word no se puede editar hasta que no haces clic en otra aplicación y vuelves a entrar
No me ocurre con todas las versiones de Excel, así que puede ser algún problema de alguna versión en concreto (y por eso a Cron le funciona pero a Jesús no)
Para volver a traer el foco del sistema a Excel, utiliza AppActivate. como el argumento es el nombre de la ventana, tómalo con Application.Caption.
En resumen, prueba con esto a ver
AppActivate Application.Caption
También te comento que con algunas versiones de Windows (no sé si será una combinación de versión de Office y versión de Windows) esto produce un error 5 en tiempo de ejecución.
Prueba a ver si te funciona y nos cuentas.
------
Ya sé Excel, pero necesito más.