[RESUELTO] Problemas con msgBox y vbYesNo
Publicado: Vie Feb 08, 2019 7:00 pm
Buenas tardes, soy novata en el foro y en la creación de macros, asi que mis disculpas antes de nada si no es aqui donde tengo que poner mi duda.
Mi problema es el siguiente estoy creando una macro donde se pueda contestar un si o un no, esta sería la macro,... pero en vez de darme las dos opciones si o no, solo me aparece aceptar. El caso es que despues de reescribirlo y de intentarlo y volverlo a intentar me funciono, asi que la guarde y a otro cosa, al dia siguiente ya no me funciona, empece de nuevo y nada, despues de varios intento lo consegui, pero cuando salgo de Calc y vuelvo a entrar ya no me funciona,... y la verdad es que me estoy volviendo loca, y la necesitaba para otra hoja que estoy realizando, alguien me puede ayudar, le pase a alguien mas ...
Gracias de antemano..
Sub Obtener_valor_del_mensaje()
'primero pongo la pregunta
resultado = MsgBox("¿Quieres saludar?", vbYesNo, "Saludar")
'ahora manejo el resultado a mi antojo
If resultado = vbYesNo Then
msgbox "Hola"
else
msgbox "Adios"
End If
End Sub
Mi problema es el siguiente estoy creando una macro donde se pueda contestar un si o un no, esta sería la macro,... pero en vez de darme las dos opciones si o no, solo me aparece aceptar. El caso es que despues de reescribirlo y de intentarlo y volverlo a intentar me funciono, asi que la guarde y a otro cosa, al dia siguiente ya no me funciona, empece de nuevo y nada, despues de varios intento lo consegui, pero cuando salgo de Calc y vuelvo a entrar ya no me funciona,... y la verdad es que me estoy volviendo loca, y la necesitaba para otra hoja que estoy realizando, alguien me puede ayudar, le pase a alguien mas ...
Gracias de antemano..
Sub Obtener_valor_del_mensaje()
'primero pongo la pregunta
resultado = MsgBox("¿Quieres saludar?", vbYesNo, "Saludar")
'ahora manejo el resultado a mi antojo
If resultado = vbYesNo Then
msgbox "Hola"
else
msgbox "Adios"
End If
End Sub