Скрыть пустые строки на листе

@ulugbek tulakov · Регистрация: 21.04.2021

Author24 — интернет-сервис помощи студентам

Добрый день. Можете помоч скрит пустых строк с формулой или макросом в 1-листе.

@Narimanych · 28.02.2023, 14:21

ulugbek tulakov,

https://uz.healthy-food-near-m... -in-excel/

@ulugbek tulakov · 28.02.2023, 14:30 **[ТС]**

Тут все вруную. Я попробоваль много вариантов но не получилос там в файле есть макрос Удалить_пустых_строк() но он удаляеть пустых строк везде. Мне надо чтоб он работаль в диапазоне строк 62:90 и 110:139. Не удалил а скриль строк в этом диапазоне.

@MikeVol · 28.02.2023, 15:18

ulugbek tulakov, Здравствуйте. Пробуйте:

Visual Basic    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
    Dim rng As Range
    Dim i As Long
    Set rng = Range("62:90")
 
    For i = rng.Rows.Count To 1 Step -1
 
        If WorksheetFunction.CountA(rng.Rows(i)) = 0 Then
            rng.Rows(i).Hidden = True
        End If
 
    Next i

На форуме полно тем с таким же вопросом. Поиск рулит.

P.S. Забыл сказать что остальные строки (110:139) по аналогии сделайте сами.

@Jack Famous · 28.02.2023, 15:37

Ещё вариант по мотивам выше)))

Visual Basic    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
Sub t()
Dim x, r&
    For Each x In Array("62-90", "110-139")
        x = Split(x, "-")
 
        For r = x(0) To x(1)
            If Not Rows(r).Hidden Then
                If WorksheetFunction.CountA(Rows(r)) = 0 Then Rows(r).Hidden = True
            End If
        Next r
    Next x
End Sub

MikeVol, это не удаление и можно сверху идти, как обычно

@ulugbek tulakov · 28.02.2023, 16:05 **[ТС]**

Jack Famous, Спасибо. Но не работает вы прбовали в моём файле. Там в строках есть формули по этому можеть не работать? Если из-за формул не работаеть как быть.

@Jack Famous · 28.02.2023, 16:22

Сообщение от ulugbek tulakov

Но не работает вы прбовали в моём файле

Так у вас там 0 стоят (строка не считается пустой), которые просто скрыты форматом ячейки

Считаем ячейки с нолями пустыми

Visual Basic    
        
            
                
                
                
                
            
        
    Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Sub t()
Dim x, arr, r&, c&
    For Each x In Array("62-90", "110-139")
        x = Split(x, "-")
 
        For r = x(0) To x(1)
            If Rows(r).Hidden Then GoTo nx
            arr = Intersect(Rows(r), ActiveSheet.UsedRange).Value2
 
            For c = 1 To UBound(arr, 2)
                If Len(arr(1, c)) <> 0 Then If arr(1, c) <> 0 Then GoTo nx
            Next c
 
            Rows(r).Hidden = True
nx:     Next r
    Next x
End Sub

@ulugbek tulakov · 28.02.2023, 16:26 **[ТС]**

Файле 1-листа имееть 3-форми 8, 8а и 8б там поставиться оценки студентам из предмета каторий сдаль экзамен. Форми 8а и 8б для неуспеваюших студентам. В конча листов есть семестровка он берёт оценки из листов.Сейчас семестровка берет оценки только с 8-форми. Неуспеваемих студентов есть оценка всех формах. Поэтому сделать формули чтоб в семестовку отобразилься самий максималний оценка студента из всех формах (8, 8а и 8б).

@Jack Famous · 28.02.2023, 16:28

ulugbek tulakov, я ни черта не понял
В вашем файле мой код прекрасно отработал

@ulugbek tulakov · 28.02.2023, 17:03 **[ТС]**

Сообщение от Jack Famous

Так у вас там 0 стоят (строка не считается пустой), которые просто скрыты форматом ячейки

Супер все работаль

Добавлено через 21 минуту
Например студент Алексей первий раз не пришёл в экзамен и у него в место оценки в ячейке G16 поставили "kelmagan". После пересдачи он брал "2" (двойку) ячейка G65. У него остался последний шанс и он этот раз сдаль экзамен на "3" (тройку) ячейка G114.
В семестровку из этих оценках отобразилься максималний 3 [3]. Число в квадратним скобке обозначаеть что сдуденть сдал экзамен на 3-й раз или в форме 8б. В квадратним скобке можеть быть число от 1 до 3 смотря в каком попытке он сдал экзамен.
Для этого надо формула. Помогите.

Добавлено через 5 минут
Jack Famous, Можете памоч.

@Jack Famous · 28.02.2023, 17:09

Сообщение от ulugbek tulakov

Для этого надо формула. Помогите.

создайте новую тему. Вопрос этой не касается

@MikeVol · 28.02.2023, 19:42

ulugbek tulakov, а мой вариант из поста #4 не подошёл?
Jack Famous, я знаю что это не удаление. Первое что вспомнил так как в своё время тоже искал решение на эту тему. ТС просил конкретно скрыть строки 62:90 и 110:139 вот и дал пример. По всем строкам листа я не пробежался а именно только эти строки указал. Да и сам файл я не смотрел.

@ulugbek tulakov · 01.03.2023, 04:40 **[ТС]**

Jack Famous,

Сообщение от MikeVol

а мой вариант из поста #4 не подошёл?

Не подошёл. Но также спасибо

@Jack Famous · 01.03.2023, 09:22

Сообщение от MikeVol

мой вариант из поста #4 не подошёл?

так я свой на основе вашего и делал. У ТСа нули в строках (которые нужно считать пустыми) и СЧЁТЗ/СЧИТАТЬПУСТОТЫ (в том виде) не подойдут

Сообщение от MikeVol

я знаю что это не удаление

я прост на всякий случай)))

Новые блоги и статьи Все статьи Все блоги /
Миграция монолита в Event-Driven микросервисную архитектуру на C# stackOverflow 11.04.2025 Монолитная архитектура – классический подход к разработке программного обеспечения. Это приложение, построенное как единое целое, где все компоненты тесно связаны между собой. Большинство проектов. . .	Go в Kubernetes: Управление ресурсами golander 11.04.2025 Разработчики Go-приложений в Kubernetes часто сталкиваются с неожиданными проблемами производительности и даже внезапными отказами контейнеров. Причина этого кроется в особенностях взаимодействия. . .	Агрегаты и сущности в DDD микросервисах Javaican 10.04.2025 Разработка современных программных систем часто приводит на распутье: монолит или микросервисы? Даже при выборе микросервисной архитектуры многие команды сталкиваются с проблемой правильного. . .	Многопоточность в C#: Task и параллельное программирование UnmanagedCoder 10.04.2025 Современные процессоры уже давно перестали наращивать тактовую частоту в пользу увеличения количества ядер. Это создало интересную ситуацию: разработчики, привыкшие к последовательному. . .	Линейное решение нелинейной задачи будет иметь приблизительный результат вычисления для метода обработки данных из double buffering. Hrethgir 10.04.2025 Вообще изначально я пренебрёг квадратурой числа, но потом понял, что для вычисления приблизительного значения - сгодится, формулу можно будет корректировать по ходу. Это потому что прямое соотношение. . .
Переменные в Python py-thonny 10.04.2025 Переменная в программировании — это символическое имя, связанное с областью памяти, в которой хранится значение. Она позволяет получать доступ к данным через понятные человеку идентификаторы, а не. . .	Многопоточность в C#: Task и асинхронные операции UnmanagedCoder 10.04.2025 Многопоточность позволяет выполнять несколько операций одновременно, что важно для решения двух основных задач: повышения скорости выполнения вычислительно-сложных операций и сохранения отзывчивости. . .	Запуск контейнеров Docker на ARM64 Mr. Docker 09.04.2025 Появление таких решений, как Apple M1/ M2, AWS Graviton, Ampere Altra и Raspberry Pi, сделало использование ARM-систем обыденностью для многих разработчиков и DevOps-инженеров. При этом Docker,. . .	Vue SFC компонент на PHP с Fusion Jason-Webb 09.04.2025 PHP на сервере и JavaScript на клиенте — классическое сочетание, которое, несмотря на свою эффективность, создает определенный когнитивный диссонанс при разработке. В этом контексте появляются. . .	TypeScript vs JavaScript: Отличия и когда что использовать Reangularity 09.04.2025 JavaScript появился в 1995 году как творение Брендана Эйха и быстро стал основой интерактивности в вебе. За свою историю он прошел путь от простого языка для манипуляций с DOM до полноценной. . .

@Narimanych 2751 / 1725 / 779 Регистрация: 23.03.2015 Сообщений: 5,447
	28.02.2023, 14:21
	ulugbek tulakov, https://uz.healthy-food-near-m... -in-excel/ 1

@ulugbek tulakov -4 / 0 / 0 Регистрация: 21.04.2021 Сообщений: 218
	28.02.2023, 14:30 [ТС]
	Тут все вруную. Я попробоваль много вариантов но не получилос там в файле есть макрос Удалить_пустых_строк() но он удаляеть пустых строк везде. Мне надо чтоб он работаль в диапазоне строк 62:90 и 110:139. Не удалил а скриль строк в этом диапазоне. 0

@ulugbek tulakov -4 / 0 / 0 Регистрация: 21.04.2021 Сообщений: 218
	28.02.2023, 16:05 [ТС]
	Jack Famous, Спасибо. Но не работает вы прбовали в моём файле. Там в строках есть формули по этому можеть не работать? Если из-за формул не работаеть как быть. 0

@Jack Famous 921 / 354 / 43 Регистрация: 10.05.2021 Сообщений: 1,495 Записей в блоге: 10
	28.02.2023, 16:28
	ulugbek tulakov, я ни черта не понял В вашем файле мой код прекрасно отработал 0

@ulugbek tulakov -4 / 0 / 0 Регистрация: 21.04.2021 Сообщений: 218
	28.02.2023, 17:03 [ТС]
	Сообщение от Jack Famous Так у вас там 0 стоят (строка не считается пустой), которые просто скрыты форматом ячейки Супер все работаль Добавлено через 21 минуту Например студент Алексей первий раз не пришёл в экзамен и у него в место оценки в ячейке G16 поставили "kelmagan". После пересдачи он брал "2" (двойку) ячейка G65. У него остался последний шанс и он этот раз сдаль экзамен на "3" (тройку) ячейка G114. В семестровку из этих оценках отобразилься максималний 3 [3]. Число в квадратним скобке обозначаеть что сдуденть сдал экзамен на 3-й раз или в форме 8б. В квадратним скобке можеть быть число от 1 до 3 смотря в каком попытке он сдал экзамен. Для этого надо формула. Помогите. Добавлено через 5 минут Jack Famous, Можете памоч. 0

@Jack Famous 921 / 354 / 43 Регистрация: 10.05.2021 Сообщений: 1,495 Записей в блоге: 10
	28.02.2023, 17:09
	Сообщение от ulugbek tulakov Для этого надо формула. Помогите. создайте новую тему. Вопрос этой не касается 1

@MikeVol Одесса - Украина 473 / 162 / 57 Регистрация: 01.04.2020 Сообщений: 533
	28.02.2023, 19:42
	ulugbek tulakov, а мой вариант из поста #4 не подошёл? Jack Famous, я знаю что это не удаление. Первое что вспомнил так как в своё время тоже искал решение на эту тему. ТС просил конкретно скрыть строки 62:90 и 110:139 вот и дал пример. По всем строкам листа я не пробежался а именно только эти строки указал. Да и сам файл я не смотрел. 0

@ulugbek tulakov -4 / 0 / 0 Регистрация: 21.04.2021 Сообщений: 218
	01.03.2023, 04:40 [ТС]
	Jack Famous, Сообщение от MikeVol а мой вариант из поста #4 не подошёл? Не подошёл. Но также спасибо 0

@Jack Famous 921 / 354 / 43 Регистрация: 10.05.2021 Сообщений: 1,495 Записей в блоге: 10
	01.03.2023, 09:22
	Сообщение от MikeVol мой вариант из поста #4 не подошёл? так я свой на основе вашего и делал. У ТСа нули в строках (которые нужно считать пустыми) и СЧЁТЗ/СЧИТАТЬПУСТОТЫ (в том виде) не подойдут Сообщение от MikeVol я знаю что это не удаление я прост на всякий случай))) 0