Boa tarde!!

Tente o evento KeyPress.

Private Sub Combo1_KeyPress(KeyAscii As Integer)

    If KeyAscii = 13 Then
        MsgBox "Você apertou enter"
        'faça isso........
    End If

End Sub

Att

Boa tarde!

Alexandrevba

Cara eu tentei e deu o seguinte erro:
"Erro de compilação:
A declaração do procedimento não corresponde à descrição de evento ou procedimento que possui o mesmo nome"

meu codigo está assim:

Private Sub cbxOrigem_KeyPress()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Application.EnableEvents = False
    
Planilha2.Range("B7").Value = cbxOrigem

Planilha4.FiltrarFrete
Planilha4.FiltrarMercadoria
Planilha4.FiltrarPeso
Planilha4.FiltrarVolumes
Planilha4.FiltrarDespachos

Planilha6.FiltrarFrete
Planilha6.FiltrarMercadoria
Planilha6.FiltrarPeso
Planilha6.FiltrarVolumes
Planilha6.FiltrarDespachos

FiltrarFrete
FiltrarMercadoria
FiltrarPeso
FiltrarVolumes
FiltrarDespachos

    Application.ScreenUpdating = True
    Application.Calculation = xlCalculationAutomatic
    Application.EnableEvents = True
End Sub

Boa tarde!!

Envie um arquivo modelo e poste aqui, para que o pessoal possa ajuda-lo!

Att

Boa tarde!

Segue exemplo como solicitado!

Obrigado pela ajuda...

Bom dia!!

Tente

Private Sub ComboBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 13 Then
        MsgBox "Apertou enter!"
        'Call Chame_sua_Macro
    End If
End Sub

Att