Userform con animaciones o efectos de transición

[AlexanderS]

Hola pues haber si me exprese bien en el titulo.

Bueno esta es una idea para crear formularios mas parecidos a una aplicación o por lo menos mas "llamativos a la vista", el userform tiene efectos de transición y alguna que otra cosita. No hace nada importante pues es solo para que vean los efectos en el userform

Las opciones de buscar no las he programado por lo que no hacen nada todo lo demás funciona.

Si tienen alguna duda o sugerencia no duden en decirme...

Hago una pequeña encuesta para ver que les pareció espero no les moleste.

Probado en Excel 2010 y 2013. Añado a servidores externos por tamaño.

Microsoft SkyDrive - Access files anywhere. Create docs with free Office Web Apps.

https://www.mediafire.com/folder/sbop2bda45shz/Formulario%20animado

Edito:

Añado archivo con efecto "Nieve" a solicitud de Enigma25

Edito otra vez

Añado efecto MATRIX

Añado efecto rebote de balón

Añado Efecto letras que cambian de color

Añado otro efecto "Efecto letras" (No se me ocurrió otro nombre)

Salu2

Blanca Navidad.zip

Matrix.zip

Efecto rebote de balón.zip

Letras de color.zip

Efecto letras.zip

[poi11]

Hola esta muy bueno el archivo, como hago para votar no veo ningún botón para poder hacerlo.?

[per2880]

Genial Reddle me parece fantastico tu aporte, en lo que respecta a los efectos en los userform con vba...gracias saludos

[Onardem]

Es excelente, no pensé que se pudieran hacer formularios con animación.

Saludos.

[AlexanderS]

Es excelente, no pensé que se pudieran hacer formularios con animación.

Saludos.

Con un poco de paciencia todo es posible amigo mio... Salu2

[Enigma25]

Felicidades señor Riddle.

excelente aporte y en verdad, yo menos pensaba que se pudiera hacer con codigo VBA, por tanto mis felicitaciones.

Su archivo lo opero bien pero si trato de crear un nuevo archivo y hacerme del codigo, me sale error....

Hay algun control del cual debo incluir y donde lo ubico?

[Enigma25]

Perdon, ya vi que faltaba los Public Declare Function en el modulo, por ello me salia error.

Mil gracias mi amigo y por cierto... se puede crear un efecto tipo cascada? asi como matrix o lluvia?

Perdone tantas preguntas.

[AlexanderS]

Perdon, ya vi que faltaba los Public Declare Function en el modulo, por ello me salia error.

Mil gracias mi amigo y por cierto... se puede crear un efecto tipo cascada? asi como matrix o lluvia?

Perdone tantas preguntas.

Hola Enigma25 prueba a ver si este archivo se acerca algo a lo que dices, utilice "textbox" para crear el efecto.

Salu2

Efecto userform.rar

Efecto userform.zip

[shitmagnetic]

Muy interesante, muchas gracias.

[Enigma25]

Hola Riddle

Como me gustó su archivo, me tomé la libertad de ver los códigos y trabajar lo a ver que me salia.

A continuación adjunto el archivo con lo aprendido hasta los momentos.

Efectos.zip

[AlexanderS]

Hola Riddle

Como me gustó su archivo, me tomé la libertad de ver los códigos y trabajar lo a ver que me salia.

A continuación adjunto el archivo con lo aprendido hasta los momentos.

Te quedo muy bueno solo una palabra :

Excelente.zip

[Enigma25]

Voy a adjuntarlo de nuevo para que vea algo que se me ocurrió con respecto a la lluvia o algo parecido. Lastima que este solo aplique para una a la vez pero es mas o menos lo que espero.

Pues bien, resulta que no sabia como repetir la acción del código para que este repitiera una y otra vez. ahora con su nuevo aporte, pude notar que emplea el Goto.

P.D. Estoy seguro que en algún lado, ví lo del efecto de cascada o lluvia. Voy a investigar y si logro dar con el video, les doy el link.

Mis respetos.

Efectos.zip

[AlexanderS]

Pues Enigma25 esto es lo mas que se me ocurrio, pero creo que quedo mas bien como un efecto de "estrellas", mira a ver si te parece es el "efecto4"

Salu2

Efectos.zip

[Enigma25]

Hola

Este es el link del video que vi para hacer la animación tipo lluvia. Me parece muy buena.

Espero la pueda ver ya que trato de ver el video y copiar los códigos pero se ve algo borroso.

Saludos.

[AlexanderS]

Enigma25, me adelanto la fecha para desearte una blanca Navidad y aquí tu regalo espero te guste:

Salu2

Blanca Navidad.zip

[Antoni]

¡ Muy bueno ! No conocía RandBetween.

[Enigma25]

jajaja excelente amido Riddle!

Es lo que esperaba y mil gracias por el tiempo que se tomó para hacerlo y bueno, lo del adelanto de navidad no estaria mal para alegrar la vida, de hecho, ahora que lo pienso,... en la cancion " 'LA JORNADA' de 'VILLANCICOS DE NAVIDAD' se declaran variables de texto : ¡DIM, DIM, DIM! ES HORA DE PARTIR

¡DIM, DIM, DIM! CAMINO DE BELEN

LOS ESPOSOS VAN DESDE NAZARETH

1. La Virgen María, modesta y sencilla,

es la maravilla del dichoso Edén

del dichoso Edén (2da vez)

2. Sobre un jumentillo se sienta María

y es experto guía el casto José.

3. Van José y María, van hacia Belén,

donde nuestro Bien ha de aparecer.

4. Largo es el camino, aire sofocante,

es más importante cumplir el deber.

5. Llegan extenuados al morir el día

y en la noche fría no hay donde hospedar.

6. Posadas repletas de inmenso gentío

¡ah, Señor, Dios mío! ¿ a dónde llegar?

7. Y saliendo al campo una grupa encuentran

y en ella se adentran para pecnotar

8. San José y la Virgen la mula y el buey

fueron lo que vieron al niño nacer.

9. Celebremos juntos este hermoso día:

llega la alegría de la Navidad.

jejeje cambié lo DIN por DIM

[AlexanderS]

Y ahora efecto MATRIX !!!! (o al menos el intento)

Matrix.zip

[Enigma25]

Guau! Es si que tiene el efecto mejorado!

Este me lo quedo,... tiene el efecto esperado.

Solo una pregunta y perdona..... cuando se cierra el formulario, se mantiene el codigo trabajando.... Existe alguna forma en parar el Sleep para que no siga corriendo?

En verdad perdone.

[Enigma25]

Por cierto...... Mil gracias por tomarse el tiempo en atender mi inquietud. Eso lo valoro mucho y admiro de su parte.

Mis respetos.

[AlexanderS]

Enigma25, no es ninguna molestia mas bien gracias a eso descubrí algunas cosillas que no sabia antes.

Para que se pare el código solo coloca esto en el formulario:

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
End
End Sub[/PHP]

Salu2

[AlexanderS]

Añado otro efecto "Rebote de balón", link en el mensaje #1

[Enigma25]

Hola

Lastima que no lo pueda ver porque me sale error. Quizás por algun control que no dispongo. Esto es algo que tambien me pasa con el control ListView que no lo puedo usar.

Tengo este nuevo Efecto. Espero le guste.

Nuevo Efecto.zip

[AlexanderS]

Están muy buenos de verdad, fijate cual de los controles es el que no te funciona solo utilizo:

2 OptionButton

2 Textbox

1 Image

1 Frame

1 Slider

2 CommandButton

Salu2

[Enigma25]

Amigo, es el slider.

Quizás por ser un boton con el que no cuento, porque los demás los seleccioné y no me daban error pero cuando seleccionaba el slider, este mo arrojaba error y no me deja ver sus propiedades y demas.

De hecho estaba pensando,.... usted sabria que causas podrian ser que estos controles no funcionen en otras computadoras como en el caso del ListView?