Condição para ActiveCell dentro ou fora do Range
Enviado: 29 Mar 2021 às 15:49
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
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
Também gostaria do modo inverso da condição para ver como ficaria melhor aqui: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 IfCódigo: Selecionar todos
Obrigado a quem puder ajudar.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