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
[RESUELTO] Problemas con msgBox y vbYesNo
[RESUELTO] Problemas con msgBox y vbYesNo
Última edición por VaccaTola el Sab Feb 09, 2019 4:49 pm, editado 1 vez en total.
windows 10, libre office 6.1.4.2
Re: Problemas con msgBox y vbYesNo
El uso de la constante vbYesNo, es propia de VBA, no de LibreOffice.
Toda la información del uso de MsgBox viene en la ayuda del programa, solo presiona F1
Código: Seleccionar todo
Const MB_YESNO As Integer = 4
Const IDYES As Integer = 6
Sub Main
'primero pongo la pregunta
resultado = MsgBox("¿Quieres saludar?", MB_YESNO, "Saludar")
'ahora manejo el resultado a mi antojo
If resultado = IDYES Then
msgbox "Hola"
else
msgbox "Adios"
End If
End Sub
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Re: Problemas con msgBox y vbYesNo
Ahora si, muchas gracias por tu ayuda...
windows 10, libre office 6.1.4.2