VBA Excel: Как выбрать только числовые значения в диапазоне?

Question

Я использовал Range.Найдите, чтобы найти строку с именем «Кол-во», теперь я хочу выбрать все числа в этом столбце.

Я хотел бы использовать .End(xlDown), чтобы получить последнюю строку, однако последняя использованная ячейка в этом столбце - это не число, а текст, и я не хочу, чтобы это было в моем выборе.

Поэтому я хотел бы знать, как выбрать диапазон, состоящий только из качеств, чтобы затем я мог скопировать его в другую рабочую книгу.

Спасибо.

Answer 1

Допустим, вы нашли слово «кол-во» и хотите выбрать числа между этой ячейкой и нижней ячейкой. Используйте атрибут смещения -

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