Filtrar origem da linha pelo nome do Formulário

Tenho uma ComboBox "Lote" em um subformulário, que é utilizado por oito Formulários.
Preciso que a "Origem da linha" da Combobox seja filtrada para atender a qualquer um dos oito Formularios.

Se Nome do Form = Form1 então Origem da linha da Combobox Consulta1
Se Nome do Form = Form2 então Origem da linha da Combobox Consulta2
Se Nome do Form = Form3 então Origem da linha da Combobox Consulta3
Se Nome do Form = Form4 então Origem da linha da Combobox Consulta4
Se Nome do Form = Form5 então Origem da linha da Combobox Consulta5
Se Nome do Form = Form6 então Origem da linha da Combobox Consulta6
Se Nome do Form = Form7 então Origem da linha da Combobox Consulta7
Se Nome do Form = Form8 então Origem da linha da Combobox Consulta8

grato

Meu amigo, o Código é esse, Coloque no evento que melhor lhe atender... Aqui pra testar por exemplo eu coloquei ao Receber foco da minha Combo:

Código:


'Me.Name Captura o Nome do Formulário
'Se o Nome do Formulario for = frm1 a Origem da Cbo será a consulta1

If Me.Name = "frm1" Then
Me.cboTeste.RowSource = "Consulta1"

ElseIf Me.Name = "frm2" Then
Me.cboTeste.RowSource = "Consulta2"

'De sequencia com ElseIf para todas as condições.
End If