Vamos supor que sua variável seja rg.
Sub Exemplo()
Dim rg As Range
Set rg = Plan1.Range(Selection.Address)
'seu código aqui...
End Sub
___________________________________________________________________________________________
Se a resposta atendeu sua dúvida, por favor, clique no Gostei e marque o Tópico como [Resolvido].
Att.
André Arruda
Postado : 08/08/2018 8:48 am