Estoy intentando hacer una hoja que sirva para el juego de "Bingo".
Falta todavía implementarle varias cosas, como por ejemplo la comprobación de la línea y el bingo, pero por ahora, encuentro unos pequeños inconvenientes, que no sé cómo solventar.
Aparte de que me he vuelto loco para que el wait funcione medianamente bien, porque dependiendo de dónde coloque las líneas y dónde coloque el comando application.wait, los números se cantan y aparecen en la pantalla a su bola. Parece que ahora con la estructura que tengo, funciona medianamente bien.
Me surgen dos problemas:
Uno es que si nada más empezar el sorteo, doy a ESCAPE, me salta un error. Ya sé que tengo que esperar a que se canten un par de números para que funcione bien, pero por si tiene solución.
El otro es que si espero un segundo más de la cuenta en que se cante el número y pulso ESCAPE, el número aparece en la pantalla y no se canta. Ya digo que he modificado la posición de application.wait y si lo hago, más o menos sucede lo mismo, pero se desbarata la aparición de los número y su cántico correspondiente. Posiblemente si aumento el tiempo de espera, se podría solucionar medianamente, pero haría un juego super pesado y largo.
Adjunto la hoja. Como he comentado en algún otro post, soy aficionado y seguramente con muchos menos comandos u operaciones se consiga lo mismo, pero bueno, la he estructurado así y me da pereza pensarla de otra manera.
Al saltar los errores, los botones no se hacen "enabled" como se deberían hacer, hay que hacerlo manualmente si ello sucede.
Por cierto, sigo sin conseguir que un botón de "Pausa" en vez de pulsar ESCAPE haga algo... Me han comentado utilizar Application.Onkey. Voy a ver si soy capaz de hacerlo funcionar.
Bueno, ya me diréis si me podéis orientar sobre los fallos que reporto.
Buenas tardes.
Estoy intentando hacer una hoja que sirva para el juego de "Bingo".
Falta todavía implementarle varias cosas, como por ejemplo la comprobación de la línea y el bingo, pero por ahora, encuentro unos pequeños inconvenientes, que no sé cómo solventar.
Aparte de que me he vuelto loco para que el wait funcione medianamente bien, porque dependiendo de dónde coloque las líneas y dónde coloque el comando application.wait, los números se cantan y aparecen en la pantalla a su bola. Parece que ahora con la estructura que tengo, funciona medianamente bien.
Me surgen dos problemas:
Uno es que si nada más empezar el sorteo, doy a ESCAPE, me salta un error. Ya sé que tengo que esperar a que se canten un par de números para que funcione bien, pero por si tiene solución.
El otro es que si espero un segundo más de la cuenta en que se cante el número y pulso ESCAPE, el número aparece en la pantalla y no se canta. Ya digo que he modificado la posición de application.wait y si lo hago, más o menos sucede lo mismo, pero se desbarata la aparición de los número y su cántico correspondiente. Posiblemente si aumento el tiempo de espera, se podría solucionar medianamente, pero haría un juego super pesado y largo.
Adjunto la hoja. Como he comentado en algún otro post, soy aficionado y seguramente con muchos menos comandos u operaciones se consiga lo mismo, pero bueno, la he estructurado así y me da pereza pensarla de otra manera.
Al saltar los errores, los botones no se hacen "enabled" como se deberían hacer, hay que hacerlo manualmente si ello sucede.
Por cierto, sigo sin conseguir que un botón de "Pausa" en vez de pulsar ESCAPE haga algo... Me han comentado utilizar Application.Onkey. Voy a ver si soy capaz de hacerlo funcionar.
Bueno, ya me diréis si me podéis orientar sobre los fallos que reporto.
Muchas gracias.
BINGO.xlsm