Cómo hacer que Excel hable

¿Te imaginas tener a Excel como tu asistente personal, hablándote y recordándote tus pendientes o los cumpleaños de tus compañeros de trabajo? En este tutorial, te mostraré cómo hacer precisamente eso mediante el uso de macros en Excel.

Cómo hacer que Excel hable

Haz que Excel te Hable y diga tu Lista de Pendientes o Cumpleaños para hoy

Activando la Opción de Texto a Voz en Windows

Antes de comenzar, asegúrate de que la opción de texto a voz esté activada en tu sistema operativo Windows. Puedes hacerlo siguiendo estos pasos:

  1. Ve al menú de inicio y busca “Texto a Voz”.
  2. Selecciona la opción correspondiente y asegúrate de que esté activada.

Creando la Macro en Excel

  1. Abre Visual Basic: Ve a la ficha “Programador” en Excel y selecciona “Visual Basic”. Si no ves la ficha “Programador”, presiona “Alt + F11” para abrir Visual Basic.
  2. Escribe la Macro: En el editor de Visual Basic, crea una nueva macro con el nombre “Hablar” dentro del archivo de Excel que deseas usar como asistente. Utiliza el siguiente código como guía:
'Mi canal de YouTube | youtube.com/user/sergioacamposh
'Mi academia de Cursos | deztaca.com/entrar
'Descarga mi add-in | addin.exceleinfo.com
'Obtén la Certificación Excel Expert | exceleinfo.com/certificacion-mos

Private Sub Workbook_Open()

Call Hablar

End Sub

Sub Hablar()
Dim MiRango As Range
Dim Celda As Range
Dim Nombre, Nombre2, Mensaje, Usuario

Set MiRango = Range("tblCumples[FECHA_CUMPLEAÑOS]")
Usuario = Application.UserName

For Each Celda In MiRango
    If WorksheetFunction.Text(Celda.Value, "dd/mm") = WorksheetFunction.Text(Date, "dd/mm") Then
        Mensaje = Usuario & ", hoy se festejan estos cumpleaños."
        
        Nombre = "- " & Celda.Offset(0, -1).Value
        Nombre2 = Nombre2 & vbNewLine & Nombre
    End If
Next Celda

If IsEmpty(Nombre2) Then
    
    Application.Speech.Speak "No hay cumpleañeros hoy.", True
    MsgBox "No hay cumpleañeros hoy.", vbInformation

Else

    Application.Speech.Speak Mensaje & Nombre2, True
    MsgBox Mensaje & vbNewLine & Nombre2, vbInformation
    
End If

End Sub

Asignando la Macro a un Botón

  1. Inserta un Botón: En Excel, inserta un botón desde la ficha “Insertar” y asigna la macro “Hablar” que acabas de crear.
  2. Prueba la Funcionalidad: Guarda y cierra el archivo. Luego, vuelve a abrirlo, habilita las macros si es necesario y haz clic en el botón. Escucharás a Excel informarte sobre los cumpleaños del día y verás un mensaje emergente con la misma información.

Suscríbete para más tutoriales

Descarga el archivo para practicar

Escribe tu correo electrónico para recibir gratis el archivo para practicar.

Leave a Comment

Your email address will not be published. Required fields are marked *

Scroll to Top