Criar função Desabilitar botões de navegação

Há como criar uma modulo global para desabilitar botões de navegação a apartir do codigo abaixo ou este codigo somente desabilita todos os controles de uma formulario?

Function HabDesabControles(Frm As Form, Sit as Boolean)
Dim ctr As Control
For Each ctr In Frm.Controls
If typeof ctr is TextBox Or typeof ctr is ComboBox Then
ctr.enabled = sit
End If
Next ctr
End Function

Olá. Para desativar todos os botões de comando do formulário, cole esse código em novo módulo:
Public Function DesativaBnt(argFrm As Form)
 Dim ctl As Control
 For Each ctl In argFrm.Controls
   With ctl
       
      Select Case .ControlType
     
         Case acCommandButton 'Desabilita botões de comando
               .Enabled = False
   End Select
 End With
Next ctl
End Function

e no evento abrir do formulário: Call DesativaBnt(Form_NomeDoFormulário)

a ideia é desabilitar os botões "Primeiro" e "Anterior" quando o registro selecionado for o primeiro e desabilita os botões ""Próximo" e "ultimo" quando o registro selecionado for o Ultimo, e quando não for nenhum dos casos anteriores habilita todos os botões. Será possível?

quando vc diz função global em um módulo subtende-se que vc quer desabilitar todos os botões do formulário, se vc quer desabilitar individualmente tem que fazer isso direto no formulário.

Faz assim: cria no formulário uma caixa de texto não acoplada com o nome ExibRegistro e na fonte de controle coloque:
=SeImed(ÉNulo([CódigoDaTabela]);0;DSoma("[CódigoDaTabela]";"NomeDaTabela";"[CódigoDaTabela]=" & [CódigoDaTabela])) ' Para exibir o nro do registro do formulário
e no evento atual do formulário:
If Me.ExibRegistro = 1 Then
Me.PróximoBotão.Enabled = False
Me.ÚltimooBotão.Enabled = False
Else
Me.PróximoBotão.Enabled = True
Me.ÚltimooBotão.Enabled = True
End If