Escribir desde VBA en la barra de estado de Ms Access 2010

Esta funció permite cambiar el texto de la barra de estado en Access 2010.

Public Function setStatusBar(Optional text As String = "")
 If text = "" Then
   SysCmd acSysCmdClearStatus
 Else
   SysCmd acSysCmdSetStatus, text
 End If
End Function

Se invoca:

setStatusBar "Hola Mundo!"

para limpiar:

setStatusBar

 

Deja un comentario

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *

Este sitio usa Akismet para reducir el spam. Aprende cómo se procesan los datos de tus comentarios.