получение ошибка переполнения, когда я использовал функцию «ActiveSheet.UsedRange.Rows.Count», чтобы найти количество в Excel VBA

Question

Я получаю сообщение об ошибке переполнения, когда я пытался использовать функцию

ActiveSheet.UsedRange.Rows.Count

in VBA Excel

Answer 1

Вы определили свою переменную как целое, а не длинное или плавающее? Если число строк больше 32256 или что-то слишком большое, чтобы быть целым числом.

Answer 2

Я иду на предположении, у вас есть что-то вроде следующего:

Dim x as Integer 

x = ActiveSheet.UsedRange.Rows.Count 

Чтобы исправить просто изменить его на:

Dim x as Long 

x = ActiveSheet.UsedRange.Rows.Count 

Или

Dim x& 

x = ActiveSheet.UsedRange.Rows.Count 

Амперсанд (&) символ объявления типа представляет собой длинный

Типы данных Integer и Long могут содержать как положительные, так и отрицательные значения. Разница между ними заключается в их размер: Целочисленные переменные могут содержать значения между 32768 и 32767, в то время как длинные переменные могут варьироваться от -2147483648 до 2147483647

Поскольку рабочие листы Excel может иметь более 32767 строк, вы не можете ВСЕГДА вставьте число строк в целое число и должно использовать Long.