Notifications
Clear all

Definindo uma range

4 Posts
3 Usuários
0 Reactions
973 Visualizações
(@c_nicoleti)
Posts: 24
Eminent 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: 170
Estimable 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.

Se a resposta lhe foi útil, clique no joinha!

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

ou

Range("A2:A" & lastrow).Select

Osvaldo

 
Postado : 04/04/2017 8:33 am
(@c_nicoleti)
Posts: 24
Eminent Member
Topic starter
 

Obrigado! Solucionado!

 
Postado : 04/04/2017 11:07 am