Bei Excel und Word kann man recht einfach in die Statusleiste schreiben:

> Application.StatusBar = "Doing"

zum Leeren:

> Application.StatusBar = False

Mit Access lässt sich nicht so einfach in die Statusleiste schreiben.

Ich verwende dazu immer folgende Prodzedur: [Quelle]

Sub Status(pstrStatus As String)
Dim lvarStatus As Variant
If pstrStatus = "" Then
lvarStatus = SysCmd(acSysCmdClearStatus)
Else
lvarStatus = SysCmd(acSysCmdSetStatus, pstrStatus)
End If
End Sub

Der Aufruf erfolgt folgendermaßen:

> Status("Processing Records")

Um die Statusleiste danach wieder zu leeren:

> Status("")