Msgbox que desaparezca solo después de x segundos
Necesito ayuda con la creación de unos msgbox pero que desaparezcan solo después de cierta cantidad de segundos, alguien podría enviarme algún código que lo haga ya que en mis proyectos necesito mostrarlos solo por unos dos segundos y en otros 3 y e otros con los botones.
1 Respuesta
Prueba este a ver si te silve
Sub MsgboxTime()
'
' aneudys01
Dim AckTime As Integer
Dim InfoBox As Object
Set InfoBox = CreateObject("WScript.Shell")
AckTime = 3
Select Case InfoBox.Popup("Click OK or do nothing within 3 seconds.", _
AckTime, "This is your Message Box", 0)
Case 1, -1
Exit Sub
End Select
End Sub
si te silve no olvides valor para cerrar la pregunta
$$\begin{align}&Saludos\end{align}$$
De verdad, Muchas gracias es exactamente lo que esperaba .
Saludos.
Hola Aneudys Martinez, Disculpe vuelva a la misma pregunta, si quisiera que durase menos de 1 segundo el msgbox, como podría realizarlo?
:)
Saludos
esta parte son los segundos AckTime = 3
El 3 significa 3 seg si pones 10 sria para dies segundos
