S spodnjim makrom lahko prikažete ukazno vrstico, centrirano na zaslonu, vodoravno in navpično.
Makro prikazuje tudi, kako lahko dobite velikost zaslona s funkcijo GetSystemMetrics32.
Razglasi funkcijo GetSystemMetrics32 Lib "User32" _ Vzdevek "GetSystemMetrics" (ByVal nIndex As Long) As Long Pod CenterCommandBar () Dim w As Long, h As Long w = GetSystemMetrics32 (0) 'screenwidth in points h = GetSystemMetrics32 (1)' screenheet v točkah z ukaznimi vrsticami ("MyCommandBarName"). Položaj = msoBarFloating.