Как использовать access и vba для обновления формы (проблемы)?

Question

Я хочу нажать на кнопку «Agrandir», и текст изменит свой размер на (size = size + 1)

Я использую следующий код:

Sub OnActionButton(control As IRibbonControl)
    Select Case control.ID
        Case "btn_Agrandir"
            Form_frm_Article_lst.DatasheetFontHeight = Form_frm_Article_lst.DatasheetFontHeight + 1
            Form_frm_Article_lst.Refresh
            Form_frm_Article_lst.Requery
    End Select
End Sub

Я не вижу изменения размера, вы должны закрыть форму и открыть, чтобы увидеть изменения.

Если я использую следующий код, он будет работать без проблем (Code_Article - это имя столбца кода)

Private Sub Code_Article_Click()
    Me.DatasheetFontHeight = Me.DatasheetFontHeight + 1
End Sub

но я хочу использовать это с ленты.

Результат, который я хочу