En el siguiente archivo encuentra 20 frases para emprendedores, con un conjunto de imágenes apropiadas para cada mensaje.
Descargar las frases de Emprendedores: Frases de Emprendedores
Coméntanos cuales son tus frases de emprendedores favoritas para incluirlas en nuestra relación, y al mismo tiempo mejoremos el archivo.
¿Cómo se realizó?
En esta oportunidad he creado un formulario que aleatoriamente muestre una frase y una imagen de una base de datos con 20 frases diferentes y 10 imágenes distintas de manera aleatoria.
Pasos a seguir:
- Seleccionamos las frases a colocar en la BD de la hoja2.
- Abrimos VBA e insertamos un Formulario, UserForm1.
- Insertar un Label e Image del cuadro de herramientas para que ahí aparezcan la frase e imagen aleatoria respectivamente. Además inserte un CommandButton, al cual lo nombré “¡Motívate!” como caption , para cada que se haga clic en el mismo se realice el juego aleatorio de frase e imagen.
- Luego diseñe el formulario donde se puede cambiar las propiedades de cada herramienta añadida; por ejemplo, el tipo, color y tamaño de letra del Label al igual que del CommandButton.
- Inserte a la Hoja1 un CommandButton al cual lo nombré “Frases motivadoras para emprendedores” como caption
- Listo!