Есть ли способ получить acSysCmdInitMeter и показать его в форме?

Question

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

    'Insert new data
    strSQL = "INSERT INTO TBL_DIRECTORS " & _
             "SELECT importDirectors.* " & _
             "FROM importDirectors LEFT JOIN TBL_DIRECTORS ON importDirectors.[CompanyRegNumber] = TBL_DIRECTORS.[CompanyRegNumber];"

    DoCmd.RunSQL strSQL

    'Update existent data
    strSQL = "UPDATE TBL_DIRECTORS INNER JOIN importDirectors ON (importDirectors.[OperatorName] = " & _
             "TBL_DIRECTORS.[OperatorName]) AND (importDirectors.CompanyRegNumber = TBL_DIRECTORS.CompanyRegNumber) SET "

    For Each field In fields
        strSQL = strSQL & strFormat("TBL_DIRECTORS.[{0}] = [importDirectors].[{1}], ", field.Name, field.Name)
    Next

    strSQL = Left(strSQL, InStrRev(strSQL, ",") - 1) & ";"
    DoCmd.RunSQL strSQL

Когда выполняется запрос UPDATE, я знаю, что у нас это есть в строке состояния:

Это acSysCmdInitMeter.

Есть ли способ получить это и показать в другом месте, как в моей форме?