Как заполнить порядковые номера, пропустить скрытые строки в Excel?
Предположим, у вас есть диапазон данных фильтра, который вы хотите заполнить порядковыми номерами в отфильтрованной пустой ячейке, как показано на следующем снимке экрана. В этом случае перетаскивание маркера заполнения не приведет к правильному заполнению ячеек в целом, в этой статье я расскажу о некоторых хороших приемах для решения этой задачи в Excel.
 |
 |
 |
Заполните порядковые номера, пропустите скрытые строки с помощью формулы
Заполните порядковые номера, пропустите скрытые строки с кодом VBA
Заполните порядковые номера, пропустите скрытые строки с помощью Kutools for Excel
Заполните порядковые номера, пропустите скрытые строки с помощью формулы
Чтобы заполнить порядковые номера только видимыми ячейками, вам может помочь простая формула. Сделайте следующее:
1. Введите эту формулу: = ПРОМЕЖУТОЧНЫЙ ИТОГ (103; B $ 3: B3)(B3 - это видимая ячейка, соответствующая ячейке, с которой вы хотите начать заполнение порядкового номера) в первую ячейку, в которую вы хотите заполнить порядковые номера, A3, для этого экземпляра, а затем нажмите Enter key вы получите цифру 1, см. снимок экрана:
2. Затем выберите ячейку A3 и перетащите маркер заполнения вниз к ячейкам, которые вы хотите заполнить порядковыми номерами, см. Снимок экрана:
Заполните порядковые номера, пропустите скрытые строки с кодом VBA
Следующий код VBA также может помочь вам заполнить порядковые номера только видимыми ячейками, пожалуйста, сделайте следующее:
1. Удерживайте ALT + F11 , чтобы открыть Microsoft Visual Basic для приложений окно.
2. Нажмите Вставить > Модулии вставьте следующий код в Модули Окно.
Код VBA: заполните порядковые номера, пропустите скрытые строки:
Sub FillValue()
'updateby Extendoffice
Dim xRg As Range
Dim xCell As Range
Dim xTxt As String
Dim xVal As Long
Dim I As Long
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the data range", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = xRg.SpecialCells(xlVisible)
Debug.Print xRg.Address
If xRg Is Nothing Then Exit Sub
For Each xCell In xRg
xVal = xVal + 1
xCell = xVal
Next
End Sub
3, Затем нажмите F5 нажмите клавишу для запуска этого кода, и появится диалоговое окно, напоминающее вам о выборе диапазона данных, который вы хотите заполнить, см. снимок экрана:
4, Затем нажмите OK кнопки, порядковые номера были заполнены только видимыми ячейками.
Заполните порядковые номера, пропустите скрытые строки с помощью Kutools for Excel
Только два вышеуказанных метода могут помочь вам заполнить порядковые номера в видимых ячейках, если вы хотите заполнить последовательность как AA-0001-BB, AA-0002-BB, AA-0003-BB…, вышеуказанные методы не будут работать. Но, пожалуйста, не беспокойтесь о том, Kutools for ExcelАвтора Вставить порядковый номер Утилита поможет вам закончить это быстро и легко.
| Kutools for Excel : с более чем 300 удобными надстройками Excel, бесплатно и без ограничений в течение 30 дней. |
После установки Kutools for Excel, пожалуйста, сделайте следующее:
1. Выделите ячейки, которые вы хотите заполнить строками последовательности.
2. Нажмите Кутулс > Вставить > Вставить порядковый номер, В Вставить порядковый номер диалоговое окно, нажмите Новые кнопку см. скриншоты:
 |
|
 |
3. В развернутом диалоговом окне укажите необходимые настройки в левом нижнем разделе, в то же время вы можете предварительно просмотреть последовательность в правой нижней панели, см. Снимок экрана:
4. После завершения настройки нажмите Добавить кнопку, чтобы сохранить этот новый элемент в поле списка выше, см. снимок экрана:
6. Затем выберите созданный элемент и нажмите Диапазон заполнения , строки последовательности были заполнены только видимыми ячейками, см. снимок экрана:
Загрузите бесплатную пробную версию Kutools for Excel прямо сейчас!
Демо: Заполните порядковые номера, пропустите скрытые строки с помощью Kutools for Excel
Лучшие инструменты для офисной работы
Улучшите свои навыки работы с Excel с помощью Kutools for Excel и почувствуйте эффективность, как никогда раньше. Kutools for Excel предлагает более 300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы получить функцию, которая вам нужна больше всего...
Вкладка Office: интерфейс с вкладками в Office и упрощение работы
- Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
- Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
- Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!
