Прескочи на основното съдържание

Как да номерирате редове след автоматично вмъкване или изтриване на редове в Excel?

Автор: Xiaoyang Последна промяна: 2020-05-07

Да предположим, че съм номерирал редове от 1 до 20 в колона, сега, когато вмъкна или изтрия ред от диапазона от данни, искам списъкът с номера да може да се преномерира автоматично. Тази задача може ли да бъде изпълнена в Excel?

Номерирайте редове след вмъкване или изтриване на редове автоматично с формули

Номерирайте редовете след вмъкване или изтриване на редове автоматично с VBA код


Номерирайте редове след вмъкване или изтриване на редове автоматично с формули

Всъщност функцията Ред в Excel може да ви помогне да преномерирате автоматично редовете след вмъкване или изтриване на редове, моля, направете следното:

1. Въведете тази формула: = РЯД () - 1 в клетка A2 и след това плъзнете манипулатора за запълване надолу до клетките, в които искате да номерирате редовете, вижте екранната снимка:

doc автоматично номериране на редове 1

Забележка: Ако вашият списък с числа започва от първата клетка, можете да промените формулата като =РЕД(), можете да добавяте или изваждате от формулата, ако вашите числа не съвпадат с действителния ред, например, = РЯД () - 3, =РЕД()+10...

2. След това създайте таблица за този диапазон от данни, изберете диапазона от данни и щракнете Поставете > Маса, а след това в Създаване на таблица диалогов прозорец, проверете Моята таблица има заглавки ако има заглавки във вашия диапазон, вижте екранната снимка:

doc автоматично номериране на редове 2

3, И после щракнете върху OK, таблицата е създадена наведнъж и сега, когато вмъкнете или изтриете редове в диапазона на таблицата, номерата на редовете винаги се актуализират автоматично, вижте екранната снимка:

doc автоматично номериране на редове 3


Номерирайте редовете след вмъкване или изтриване на редове автоматично с VBA код

Освен горния метод на формула, можете също да го завършите с VBA код.

1. Отидете на работния лист, в който искате автоматично да вмъкнете поредни номера.

2. Щракнете с десния бутон върху раздела на листа и изберете Преглед на кода от контекстното меню, в изскачащия Microsoft Visual Basic за приложения прозорец, моля, копирайте и поставете следния код в празния прозорец на модула.

VBA код: Автоматично номериране на редове след вмъкване или изтриване на редове:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160612
    Dim I As Integer
    I = 1
    Application.EnableEvents = False
    For I = 1 To 20
        Range("A" & I).Value = I
    Next
    Range("A21").Value = ""
    Application.EnableEvents = True
End Sub

3. След това запазете и затворете този код, когато въведете първото число 1 в клетка A1, последователните номера от 1 до 20 ще бъдат попълнени автоматично. Ако вмъкнете или изтриете редове от диапазона, серийният номер ще бъде преномериран автоматично веднага.

Забележка: В горния код буквата A показва буквата на колоната, която искате да попълните поредния номер, 1 Това 20 е редовете, които искате да номерирате, и A21 е препратката към клетката до последната ви номерирана клетка. Можете да ги промените според нуждите си.


Вмъкване на водещи символи или номерационен списък в колона от клетки

Kutools за Excel's Вмъкване на куршум и азnsert Номериране функциите могат да ви помогнат бързо да вмъкнете списък с водещи символи и номериран списък в колона от клетки. Щракнете, за да изтеглите Kutools за Excel!

Kutools за Excel: с повече от 300 удобни добавки за Excel, безплатни за изпробване без ограничение за 30 дни. Изтеглете и изпробвайте безплатно сега!


Демонстрация: Номерирайте редове след автоматично вмъкване или изтриване на редове в работен лист на Excel

Най-добрите инструменти за продуктивност в офиса

🤖 Kutools AI помощник: Революционизирайте анализа на данни въз основа на: Интелигентно изпълнение   |  Генериране на код  |  Създаване на персонализирани формули  |  Анализирайте данни и генерирайте диаграми  |  Извикване на функциите на Kutools...
Популярни функции: Намерете, маркирайте или идентифицирайте дубликати   |  Изтриване на празни редове   |  Комбинирайте колони или клетки без загуба на данни   |   Кръг без формула ...
Супер търсене: VLookup с множество критерии    VLookup с множество стойности  |   VLookup в няколко листа   |   Размито търсене ....
Разширен падащ списък: Бързо създаване на падащ списък   |  Зависим падащ списък   |  Падащ списък с множество избори ....
Мениджър на колони: Добавете конкретен брой колони  |  Преместване на колони  |  Превключване на състоянието на видимост на скритите колони  |  Сравнете диапазони и колони ...
Препоръчани функции: Мрежов фокус   |  Изглед на дизайна   |   Голям формула бар    Мениджър на работни книги и листове   |  Библиотека с ресурси (Автоматичен текст)   |  Избор на дата   |  Комбинирайте работни листове   |  Шифроване/декриптиране на клетки    Изпращайте имейли по списък   |  Супер филтър   |   Специален филтър (филтър получер/курсив/зачертано...) ...
Топ 15 комплекта инструменти12 Текст Инструменти (добавяне на текст, Премахване на символи, ...)   |   50 + Графика Видове (диаграма на Гант, ...)   |   40+ Практичен формули (Изчислете възрастта въз основа на рождения ден, ...)   |   19 вмъкване Инструменти (Въведете QR код, Вмъкване на картина от пътя, ...)   |   12 Конверсия Инструменти (Числа към думи, Валутен обмен, ...)   |   7 Обединяване и разделяне Инструменти (Разширено комбиниране на редове, Разделени клетки, ...)   |   ... и още

Усъвършенствайте уменията си за Excel с Kutools за Excel и изпитайте ефективност, както никога досега. Kutools за Excel предлага над 300 разширени функции за повишаване на производителността и спестяване на време.  Щракнете тук, за да получите функцията, от която се нуждаете най-много...

Описание


Раздел Office Внася интерфейс с раздели в Office и прави работата ви много по-лесна

  • Разрешете редактиране и четене с раздели в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
  • Отваряйте и създавайте множество документи в нови раздели на един и същ прозорец, а не в нови прозорци.
  • Увеличава вашата производителност с 50% и намалява стотици кликвания на мишката за вас всеки ден!
Comments (6)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
is there any formula?
This comment was minimized by the moderator on the site
if i delete the row, is there any possibility to set below numbers are in serial
This comment was minimized by the moderator on the site
Thanks....
This comment was minimized by the moderator on the site
Just what I was looking for thank you!!
This comment was minimized by the moderator on the site
very very thanks! http://www.extendoffice.com<br /> :D
This comment was minimized by the moderator on the site
It doesn't work for me. It won't allow me to insert a table for more than one row. If I proceed without it, it does not change the numbers after deleting or adding a row. Please advise. Thanks!
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations