Este fórum está sendo desativado

[SandroLima]

Boa tarde, pessoal

Como faço para colocar uma condição em que a Célula selecionada esteja dentro ou fora do Range de uma Tabela. Preciso das duas condições

Considerando que:
- Tabela = Wsh_BDRecibos .ListObjects("TB_Recibos")
- Ini_Lin = Tabela.HeaderRowRange.Row + 1
- Lin_Tabela =
- Lin_Atual = Selection.Row

Seria algo como:
Se a célula selecionada estiver dentro do range Tabela

Código: Selecionar todos

If ActiveCell ... (estiver dentro do range tabela e estiver )  Then 
     Retornar uma InputBox com o valor da Coluna "Recibo" da linha da célula selecionada
Else
     Retornar uma InputBox com o valor da Coluna "Recibo" da linha 1 (no caso do exemplo anexo seria C95.2103.S26)
End If

Também gostaria do modo inverso da condição para ver como ficaria melhor aqui:

Código: Selecionar todos

If ActiveCell not ... (não estiver dentro do range tabela e estiver )  Then 
     Retornar uma InputBox com o valor da Coluna "Recibo" da linha 1 (no caso do exemplo anexo seria C95.2103.S26)
Else
     Retornar uma InputBox com o valor da Coluna "Recibo" da linha da célula selecionada
End If

Obrigado a quem puder ajudar.

[SandroLima]

Boa tarde, pessoal.

Alguém pode ajudar com essa parte da macro?