Съвет: Други езици са преведени от Google. Можете да посетите English версия на тази връзка.
Влизане
x
or
x
x
Регистрация
x

or

Как да скриете квадратчето, когато редът е скрит в Excel?

Обикновено, когато скриването на ред съдържа квадратчета за отметка в клетките на редовете, квадратчетата за отметка няма да бъдат скрити с реда, а се припокриват със съдържанието на друг ред, както е показано лявото скрийншоу. Как да скриете отметките, когато редът е скрит в Excel? Тази статия ще ви помогне да я разрешите.

Отметнете квадратчето, ако редът е скрит с код VBA


Може да се интересувате от:

Лесно вмъкване или изтриване на множество квадратчета за отметка / бутони за избор в насипно състояние в Excel

С Kutools за Excel's Бутони за поставяне на партиди / бутони за избор or Шаблони за изтриване на партиди / бутони за избор помощни програми, можете да вмъквате или изтривате множество квадратчета за отметка или бутони за избор в насипно състояние във вашия работен лист в Excel. Вижте screenshot по-долу:

Препоръчителни инструменти за производителност за Excel

Таб на Office: Носете мощни раздели в Office (включително Excel), точно като Chrome, Safari, Firefox и Internet Explorer. Спестете половината от времето и намалете хиляди кликвания на мишката за вас. 30-ден неограничен безплатен пробен период

Kutools за Excel: Запазете 71% от времето си и решете проблемите на 82% Excel. 300 + усъвършенствани инструменти, предназначени за 1500 + сценарий, правят Excel много по-лесен и незабавно увеличават производителността.60-ден неограничен безплатен пробен период


arrow синя десен балон Отметнете квадратчето, ако редът е скрит с код VBA


Можете да изпълните следния код на VBA, за да скриете квадратчетата за отметка, когато реда е скрит в Excel.

1. Кликнете с десния бутон върху раздела лист с квадратчетата за отметка, които искате да скриете, и кликнете Преглед на кода от дясното меню.

2. В Microsoft Visual Basic за приложения прозорец, копирайте и поставете кода по - долу в VBA код прозорец.

Код на VBA: отметнете квадратчето, когато редът е скрит

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim xChkBox As CheckBox
    Dim xCell As Range
    Dim xHide As Boolean
    If Target.EntireRow.AddressLocal = Application.Intersect(Target, Target.EntireRow).AddressLocal Then
        xHide = (MsgBox("Hide Rows ???", vbYesNo + vbQuestion, "Kutools for Excel") = vbYes)
        Target.EntireRow.Hidden = xHide
        For Each xChkBox In ActiveSheet.CheckBoxes
            Set xCell = xChkBox.TopLeftCell
            If Not Intersect(xCell, Target) Is Nothing Then
                xChkBox.Visible = Not xHide
            End If
        Next
    End If
End Sub

3. След това натиснете Друг + Q ключове едновременно, за да затворите Microsoft Visual Basic за приложения прозорец.

4. Изберете целия ред с квадратчетата за отметка, които трябва да скриете, след което се появи диалогов прозорец, щракнете върху да бутон.

След това можете да видите, че всички квадратчета са скрити с реда, както е показано на екрана.

Забележка: За показване на скрития ред с квадратчета за отметка, моля, изберете цели редове, включително скрития ред, и в диалоговия прозорец, който се появява, кликнете върху Не бутон. След това ще се покаже редът с квадратчета за отметка.


arrow синя десен балонОще по темата:


Препоръчителни инструменти за производителност

Лента с Excel (с инсталиран Kutools за Excel)

300 + Разширени функции Увеличете производителността си с 71% и помогнете да се откроявате от тълпата!

Искате ли да завършите ежедневната си работа бързо и перфектно? Kutools за Excel носи 300 + готини и мощни разширени функции (Комбинирайте работни книги, сума по цвят, съдържание на разделени клетки, дата на конвертиране и т.н.) за Работни сценарии 1500 +, ви помага да решите Проблеми с 82% Excel.

  • Справете се с всички сложни задачи за секунди, помогнете за подобряване на вашата работоспособност, получавате успех от ожесточената конкуренция и никога не се тревожете за уволнение.
  • Спестете много време за работа, оставете много време да обичате и се грижите за семейството и да се насладите на комфортен живот сега.
  • Намалявайте хиляди кликвания на клавиатура и мишка всеки ден, облекчавайте уморените си очи и ръцеи да ви даде здраво тяло.
  • Станете експерт на Excel в 3 минути и се полюбувайте на своите колеги или приятели.
  • Вече няма нужда да помните болезнени формули и кодове VBA, имайте релаксиращ и приятен ум, да ви даде тръпката, която никога не сте имали преди.
  • Прекарват само $ 39, но струват повече от $ 4000 обучение за другите, Използва се от 110,000 елити и 300 + добре познати компании.
  • 60-дневен неограничен безплатен пробен период, 60-дневна гаранция за връщане на парите. Безплатно ъпгрейд и поддръжка за години 2. Купи веднъж, използвай завинаги.
  • Променете начина, по който работите сега, и веднага ще ви даде по-добър живот!

Офис раздела носи ефективни и удобни раздели в Office (включително Excel), точно като Chrome, Firefox и New IE

  • Увеличава производителността ви с 50%, когато преглеждате и редактирате множество документи.
  • Намаляване на стотици кликвания на мишката за вас всеки ден, кажете сбогом на ръката на мишката.
  • Отваряйте и създавайте документи в нови раздели на същия прозорец, а не в нови прозорци.
  • Помогнете ви да работите по-бързо и лесно да се откроявате от тълпата! Секунда за превключване между десетки отворени документи!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.