Módulo 19: Interacción con el usuario (InputBox y MsgBox avanzados)

📘 Módulo 19: Interacción con el usuario (InputBox y MsgBox avanzados)

Aprende a pedir datos al usuario y mostrar mensajes con botones y opciones.

---

✅ InputBox

Dim nombre As String nombre = InputBox("¿Cómo te llamas?") MsgBox "Hola, " & nombre

---

✅ MsgBox con botones

Dim respuesta As Integer respuesta = MsgBox("¿Quieres continuar?", vbYesNo) If respuesta = vbYes Then MsgBox "Continuamos" Else MsgBox "Terminamos" End If

---

📝 Ejercicio 19️⃣: Crear un macro que pregunte si quiere borrar el contenido de la hoja y actúe según la respuesta

✅ Código sugerido:

Sub BorrarHoja() Dim respuesta As Integer respuesta = MsgBox("¿Quieres borrar toda la hoja?", vbYesNo) If respuesta = vbYes Then Cells.ClearContents MsgBox "Hoja borrada" Else MsgBox "No se borró la hoja" End If End Sub

---