Привет!

У меня есть функция, вставляющая на панель инструментов поле для текущей даты. Функция выполняется при каждом открытии моей базы Access, благодаря макросу AutoExec.
Вот функция:

Public Function command_bar_create()
    Dim cbr As CommandBar
    Set cbr = Application.CommandBars("Настраиваемая 2")
    Dim cbrc As CommandBarComboBox
    Set cbrc = cbr.Controls.Add(Type:=msoControlComboBox, Before:=1, Temporary:=True)
    With cbrc
        .Caption = "Расчетная дата"
        .Style = msoComboLabel
        .Text = Date
        .AddItem Date
        .OnAction = "=date_current()"
    End With
    Set cbrc = Nothing
    Set cbr = Nothing
End Function

Есть ли возможность добавляемому на панель полю присвоить маску ввода?

https://www.sql.ru/forum/1307188/maska-vvoda-dlya-polya-na-paneli-instrumentov