Pomoću donje makronaredbe možete prikazati CommandBar centriran na zaslonu, vodoravno i okomito.
Makro također prikazuje kako možete dobiti veličinu zaslona pomoću funkcije GetSystemMetrics32.
Deklarirajte funkciju GetSystemMetrics32 Lib "User32" _ Pseudonim "GetSystemMetrics" (ByVal nIndex koliko je dugo) Kao dugo PodCentralCommandBar () Dim w Kao dugo, h Sve dok w = GetSystemMetrics32 (0) 'širina zaslona u točkama h = GetSystemMetrics32 (1)' zaslon u točkama s naredbenim trakama ("MyCommandBarName"). Položaj = msoBarFloating .Lijevo = w / 2 -. Širina / 2. Vrh = h / 2 - .Visina / 2 Završi s End Sub