RowsCount - Microsoft Office Excel

ruavia3 · 18.06.2010, 13:22

Подскажите, как в переменную а записать количество значений из диапазона А1:А20?

a = range(cells(1,1),cells(1,20)).count - записывает количество строк, а не значений в них.

Спасибо.

nilem · 18.06.2010, 13:56

Например,
a = Range(Cells(1, 1), Cells(1, 20)).SpecialCells(xlCellTypeConstan ts).Count

SAS888 · 19.06.2010, 07:28

1. Не Range(Cells(1, 1), Cells(1, 20)), а Range(Cells(1, 1), Cells(20, 1))
2. Если значение в контролируемом диапазоне есть результат возвращаемый какой-либо функцией (формулой), то результат будет не верный.
3. Если контролируемый диапазон пуст, то вообще будет ошибка.

Поэтому, лучше сделать так:

Код:

a = Application.CountA([A1:A20])

18.06.2010, 13:22	#1
ruavia3 Форумчанин Регистрация: 13.03.2009 Сообщений: 253	RowsCount Подскажите, как в переменную а записать количество значений из диапазона А1:А20? a = range(cells(1,1),cells(1,20)).count - записывает количество строк, а не значений в них. Спасибо.

19.06.2010, 07:28	#3
SAS888 Старожил Регистрация: 05.12.2007 Сообщений: 4,180	1. Не Range(Cells(1, 1), Cells(1, 20)), а Range(Cells(1, 1), Cells(20, 1)) 2. Если значение в контролируемом диапазоне есть результат возвращаемый какой-либо функцией (формулой), то результат будет не верный. 3. Если контролируемый диапазон пуст, то вообще будет ошибка. Поэтому, лучше сделать так: Код: `a = Application.CountA([A1:A20])` Чем шире угол зрения, тем он тупее.

18.06.2010, 13:56	#2
nilem Форумчанин Регистрация: 25.04.2010 Сообщений: 616	Например, a = Range(Cells(1, 1), Cells(1, 20)).SpecialCells(xlCellTypeConstan ts).Count