En este archivo en Excel, encuentra un catálogo de frases de aliento, solo presiona el botón para generar una nueva frase, cada vez que presiones el botón se mostrará una nueva frase de aliento.
(Para mayor visualización de la imagen, hacer click en la misma)
Descargar archivo: Frases de Aliento
Para crear el archivo se utilizó un formulario con imágenes que muestra Frases de Aliento y una imagen respectiva. En la hoja datos se pueden agregar más frases así como imágenes de autores.
Primero se detecta el número de frases en la hoja datos. Luego, se selecciona una fila al azar (por ende, una frase). La frase se muestra así como una imagen asociada (el autor de la imagen y de no estar en el banco, una imagen por defecto).
Utilidad: Permite generar frases de aliento. Se practica el uso de formularios con frases e imágenes principalmente. Se repasan los conceptos de If, End(xlDown).Row, las propiedades de los elementos de un formulario (Propiedades de Label e Image principalmente) y la función RandBetween.
Descargar archivo: Frases de Aliento