.OleStatBar.Font.Size = .pbNew.FontSizeI was also able to solve the other issue about the OLE Status Bar not 'growing' in width and filling the bottom of the form. My Resize method now appears as follows:
WITH THISFORM LOCAL lnFormWidth .Resizer1.Resize() .eSetGrid() ** panel widths: lnFormWidth = .Width .OleStatBar.Panels(1).Width = (lnFormWidth * 8.0) / 100 .OleStatBar.Panels(2).Width = (lnFormWidth * 10.8) / 100 ** etc ** .OleStatBar.Font.Size = .pbNew.FontSize ** resize status bar .OleStatBar.Width = .Width - 10 ENDWITHThere is no need to reply to this message. Thanks anyway.