Выдает ошибку при работе макроса при скрытии строк при условии "Отгружен" и отключении этой функции ( показать все сроки). Другой файл работает, в этом выдает ошибку. Помогите пожалуйста разобраться. Макрос называется ЗАПУСК.
Private Sub CommandButton_HideRows_Click()
Dim txt As String
Dim КоличествоСтрок As Integer
txt = WorksheetFunction.Trim(Me.TextBox_SearchText): If Len(txt) = 0 Then Exit Sub ' если текст не введён
КоличествоСтрок = ПоискСтрокПоУсловию(txt, True)
If КоличествоСтрок > 0 Then
Kuzmich, забудьте тип "Integer", этот тип нужен был только в старых Excel на слабых компьютерах. Сейчас уже 14 лет как в Excel более миллиона строк и компьютеры быстрые с гигабайтами оперативной памяти. Пишите всегда Long (а то уже давно придумали LongLong, а вы всё Integer - 32 тысячи строк и далее ошибка). У вас же не 97 Excel на Pentium I с 16 мегабайтами памяти под Windows 3.1 P.S. посмотрите ссылку LongLong
New написал: компьютеры быстрые с гигабайтами оперативной памяти.
А без разницы. Вернее, это не основной аргумент. Integer в 64-разрядных системах все равно приводится к Long, т.е. места в памяти занимает столько же, но еще нужно какое-то время на преобразование. Даже если бы не это: max Integer = 32768, а строк намного больше.