Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado
portada

Hermosas Frases De Confianza

| 0 comments

portada

Descargar el archivo generador de frases de confianza desde aquí –> Frases de Confianza

Este proyecto permitirá la creación de un formulario en Microsoft Excel que nos permita mostrar imágenes y frases sobre confianza de forma aleatoria cada vez que presionemos el botón Generar Otra.

En esta sección se explicara paso como fue la creación de este proyecto:

1.- Primero aparecerá una ventana de Bienvenida cuando ingresemos al Archivo de Microsoft Excel:

c2

Este formulario aparecerá cuando abrimos el archivo de Excel para ello hemos tenido que crear los siguientes códigos:

En el Workbook.

          Private Sub Workbook_Open()
         UserForm1.Show
         End Sub

Si selecciona el botón continuar deberá parecer la ventana que permita ver la imágenes y las frases sobre confianza de una manera aleatoria cada vez que se presiona el botón Generar Otra…

portada

Este formulario tiene los siguientes códigos:

  • El botón Salir.

         Private Sub CommandButton2_Click()
         End
         End Sub

  • El botón Generar Otra…

         Private Sub CommandButton1_Click()

        contador_frase = WorksheetFunction.RandBetween(1, 20)

         frasealetoria = Worksheets(2).Cells(contador_frase + 1, 2)

         T1.Text = frasealetoria

        contador_imagen = WorksheetFunction.RandBetween(1, 5)

         Image1.Picture = LoadPicture(ActiveWorkbook.Path & “\frasesconfianza\” & contador_imagen & “.jpg”)
         End Sub

Espero que les guste este proyecto tanto como a mí.

Descargar el archivo generador de frases de confianza desde aquí –> Frases de Confianza

Deja un comentario

Required fields are marked *.


Excel Avanzado located at , Lima, Perú . Reviewed by usuarios rated: 4.7 / 5