VBA Excel: como selecionar apenas valores numéricos em um intervalo?

0

Eu usei Range.Find para localizar uma string chamada "Qty", agora eu quero selecionar todos os números nessa coluna.

Eu usaria .End (xlDown) para obter a última linha, no entanto, a última célula usada nessa coluna não é um número, mas texto, e eu não a quero na minha seleção.

Então, eu gostaria de saber como selecionar o intervalo que consiste apenas em quantidades, para que eu possa copiá-lo em outra pasta de trabalho.

Obrigado.

Ruben
fonte

Respostas:

1

Digamos que você encontrou a palavra "qty" e queria selecionar os números entre essa célula e a célula inferior. Use o atributo offset -

Sub test()
Dim qty As Range
Dim qtylast As Range
Set qty = Range("A1:H1").Find("qty")
Set qtylast = qty.End(xlDown)

Range(qty.Offset(1), qtylast.Offset(-1)).Select

End Sub
Raystafarian
fonte