Notifications
Clear all

Definindo uma range

4 Posts
3 Usuários
0 Reactions
956 Visualizações
(@c_nicoleti)
Posts: 0
New Member
Topic starter
 

Senhores, bom dia,

Estou com uma dúvida aparentemente simples mas que não consigo construir o código.

Tenho uma planilha onde defino a ultima linha preenchida com:

Dim lastrow As Long
    lastrow = Range("A1048576").End(xlUp).Row

E a primeira linha de dados (linha 1 é o titulo da planilha) com:

Dim firstrow As Long
    firstrow = Range("A2").Row

Estou com um problema para selecionar este intervalo de linhas. Estou tentando o seguinte:

Range(lastrow, firstrow).Select

Como seria o código correto para selecionar este intervalo de linhas?

 
Postado : 04/04/2017 8:13 am
(@skulden)
Posts: 0
New Member
 

Acontece que o método Range trabalha com intervalos e você estava colocando dois valores númericos referente às linhas.

Altere o código para:


Dim lastrow As Variant
Dim firstrow As Variant

lastrow = Range("A1048576").End(xlUp).Address
firstrow = Range("A2").Address


Range(lastrow & ":" & firstrow).Select

Abraços.

 
Postado : 04/04/2017 8:30 am
(@osvaldomp)
Posts: 857
Prominent Member
 
Range("A" & firstrow & ":A" & lastrow).Select

ou

Range("A2:A" & lastrow).Select
 
Postado : 04/04/2017 8:33 am
(@c_nicoleti)
Posts: 0
New Member
Topic starter
 

Obrigado! Solucionado!

 
Postado : 04/04/2017 11:07 am