Как пронумеровать ячейки в excel если они объединены

Если вы пробовали сделать нумерацию объединенных ячеек в Excel, то, наверное, уже поняли, что простое «протягивание ячеек» тут не работает.

При попытке «протянуть» вы получите ошибку «Для этого все объединенные ячейки должны иметь одинаковый размер». Но, нерешаемых проблем не бывает.

Для примера возьмём столбец, часть ячеек которого объединены (по две, три и пр.), а часть — нет. Необходимо пронумеровать список.

В ячейку A1 ставим 1, затем выделяем диапазон, который нужно пронумеровать. В моём примере это A3:A13. В строке формул пишем: =МАКС(A$1:A2)+1. Затем нажимаем Ctrl+Enter. Обратите внимание — Ctrl+Enter.

Функция МАКС() возвращает наибольшее значение из набора значений, а в нашем случае, мы увеличиваем наибольшее значение на единицу.

Таким образом можно сделать нумерацию, когда ячейки объединены.


  • Метки


    excel

Нумерация списка с объединенными ячейками

RumOleg

Дата: Среда, 04.04.2012, 23:44 |
Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 6


Репутация:

0

±

Замечаний:
0% ±


Добрый день!

Прошу Вас помочь с автоматической последовательной нумерацией списка с объединенными ячейками.
В приложенном файле пример — вопрос в том, как можно автоматически пронумеровать ячейки в столбике А? Необходимо это реализовывать периодически на аналогичной огромной таблице

Большое спасибо за рассмотрение вопроса

К сообщению приложен файл:

VOPROS.xls
(14.0 Kb)

 

Ответить

Michael_S

Дата: Среда, 04.04.2012, 23:48 |
Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 2012


Репутация:

373

±

Замечаний:
0% ±


Excel2016

И чё должно получиться?

 

Ответить

RumOleg

Дата: Среда, 04.04.2012, 23:50 |
Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 6


Репутация:

0

±

Замечаний:
0% ±


Должны появиться числа 123456… в столбике А.
Если написать 1,2 и «протянуть» дальше вниз по столбику, то не получится, поскольку есть объединенные ячейки

К сообщению приложен файл:

123456.xls
(18.0 Kb)

 

Ответить

DV

Дата: Четверг, 05.04.2012, 00:31 |
Сообщение № 4

Группа: Друзья

Ранг: Обитатель

Сообщений: 286


Репутация:

194

±

Замечаний:
0% ±


Excel 2010 RUS

Можно так:
В А1 ставим 1
Выделяем A3:A30
В строке формул пишем:

и жмем Ctrl+Enter

Сообщение отредактировал DVЧетверг, 05.04.2012, 00:32

 

Ответить

civic4772

Дата: Понедельник, 27.08.2012, 20:50 |
Сообщение № 5

Группа: Пользователи

Ранг: Прохожий

Сообщений: 1


Репутация:

0

±

Замечаний:
0% ±


Quote (DV)

=МАКС(A$1:A2)+1

спасибо огромное, спасли от вбивания номерации строк вручную

 

Ответить

Petroff

Дата: Вторник, 14.02.2017, 13:54 |
Сообщение № 6

Группа: Пользователи

Ранг: Прохожий

Сообщений: 2


Репутация:

0

±

Замечаний:
0% ±


Excel 2007

DV, Не могу понять как это сделать, или это из за разных версий excel? У меня 2007
что я делаю не так?

 

Ответить

Pelena

Дата: Вторник, 14.02.2017, 14:04 |
Сообщение № 7

Группа: Админы

Ранг: Местный житель

Сообщений: 18797


Репутация:

4284

±

Замечаний:
±


Excel 2016 & Mac Excel

У Вас в книге стиль ссылок R1C1. Зайдите в Параметры Excel и в разделе Формулы снимите флажок Стиль ссылок R1C1


«Черт возьми, Холмс! Но как??!!»
Ю-money 41001765434816

 

Ответить

Petroff

Дата: Вторник, 14.02.2017, 14:20 |
Сообщение № 8

Группа: Пользователи

Ранг: Прохожий

Сообщений: 2


Репутация:

0

±

Замечаний:
0% ±


Excel 2007

Pelena, Спасибо большое

Сообщение отредактировал PetroffВторник, 14.02.2017, 14:30

 

Ответить

stfio

Дата: Среда, 16.03.2022, 13:55 |
Сообщение № 9

Группа: Пользователи

Ранг: Новичок

Сообщений: 15


Репутация:

0

±

Замечаний:
0% ±


Excel 2016

у меня почему-то не получилось… подскажите пожалуйста что не так

 

Ответить

Serge_007

Дата: Среда, 16.03.2022, 14:11 |
Сообщение № 10

Группа: Админы

Ранг: Местный житель

Сообщений: 15894


Репутация:

2623

±

Замечаний:
±


Excel 2016

stfio, Вам надо вставлять, а не


ЮMoney:41001419691823 | WMR:126292472390

 

Ответить

stfio

Дата: Среда, 16.03.2022, 14:16 |
Сообщение № 11

Группа: Пользователи

Ранг: Новичок

Сообщений: 15


Репутация:

0

±

Замечаний:
0% ±


Excel 2016

Serge_007, огромное спасибо!

 

Ответить

 

Здравствуйте! Help!
Очень часто приходится пользоваться таблицами, отражающими какую либо структуру и нужно пронумеровать их. Вручную это долго и очень часто сбиваюсь, начинаю заново и так по кругу. Прошу Вас — научите, пожалуйста, как можно автоматизировать такой процесс. Пробовала =МАКС(A$1:A2)+1  что-то ничего не получилось…Очень рассчитываю на ответ! Заранее благодарна!

Прикрепленные файлы

  • Пример.xlsx (47.57 КБ)

 

vikttur

Пользователь

Сообщений: 47199
Регистрация: 15.09.2012

Если рядом не за что зацепиться (нет значений), то только макросом.

 

artemkau88

Пользователь

Сообщений: 553
Регистрация: 09.10.2019

#3

20.12.2020 14:24:47

Посмотрите этот макрос

Код
Sub Нумерация()
Dim i, n
Dim rngStart As Range
Set rngStart = Application.InputBox("Выберите первую ячейку для нумерации", , , , , , , 8)
For i = 1 To ActiveSheet.UsedRange.Rows.Count
n = n + 1
rngStart = n
Set rngStart = rngStart.Offset(1, 0)
Next i
End Sub

Изменено: artemkau8820.12.2020 14:32:53

 

New

Пользователь

Сообщений: 4582
Регистрация: 06.01.2013

Как ещё вариант, тоже макросом

 

БМВ

Модератор

Сообщений: 21383
Регистрация: 28.12.2016

Excel 2013, 2016

или не понимаю или  в A2 =МАКС(A$1:A1)+1

По вопросам из тем форума, личку не читаю.

 

Уважаемые друзья! Большое спасибо, у меня получилось!

 

vikttur

Пользователь

Сообщений: 47199
Регистрация: 15.09.2012

#7

20.12.2020 18:18:28

Цитата
БМВ написал: или не понимаю или…

или я смотрел столбец D :)

 

БМВ

Модератор

Сообщений: 21383
Регистрация: 28.12.2016

Excel 2013, 2016

#8

20.12.2020 18:48:53

Цитата
vikttur написал: столбец D

для D совершенно иная
=MAX(D$1:D1)+1  :D

По вопросам из тем форума, личку не читаю.

 

Kuzmich

Пользователь

Сообщений: 7998
Регистрация: 21.12.2012

#9

20.12.2020 19:23:25

Код
Sub iNomer()
Dim iLastRow As Long
Dim i As Long
Dim n As Long
  n = 1
  iLastRow = Columns(2).Find("Общий итог", , xlValues, xlWhole).Row
  For i = 2 To iLastRow - 1
    If Cells(i, "D").MergeCells Then
       Cells(i, "D") = n
       n = n + 1
       i = i + Cells(i, "D").MergeArea.Count - 1
    Else
       Cells(i, "D") = n
       n = n + 1
    End If
  Next
End Sub

Изменено: Kuzmich20.12.2020 19:24:04

 

vikttur

Пользователь

Сообщений: 47199
Регистрация: 15.09.2012

#10

20.12.2020 20:04:35

Цитата
БМВ написал: для D совершенно иная

Хи-хи… Посмеялся? А теперь глянь в пример )

Прикрепленные файлы

  • нумеруем.xlsx (12.52 КБ)

 

БМВ

Модератор

Сообщений: 21383
Регистрация: 28.12.2016

Excel 2013, 2016

#11

20.12.2020 20:42:09

уппс, а вот  размножение это не заметил :-(

По вопросам из тем форума, личку не читаю.

Как в «Экселе» пронумеровать строки автоматически

как в экселе пронумеровать строки

Первый способ: метод растягивания

Первый представленный способ, как в «Экселе» пронумеровать строки, считается по праву самым простым. Именно им пользуются чаще всего. Давайте перейдем непосредственно к тому, как это сделать.

В таблице вам необходимо пронумеровать две первые строки, например, вписав в них номера 1 и 2.

Затем нужно выделить эти две ячейки, зажав левую кнопку мыши на первой и перетащив курсор на вторую.

Теперь надо нажать на правый нижний угол выделения, он обычно отображается специальным квадратиком.

Зажав левую кнопку мыши, остается лишь протащить выделения до той ячейки, в которой нумерация должна оканчиваться.

как пронумеровать строки в эксель

Отпустив левую кнопку мыши, вы увидите, что все строки пронумерованы. Данный способ, как в «Экселе» пронумеровать строки, очень простой и не вызовет ни у кого трудностей, однако он не очень подойдет в тех случаях, когда нужно пронумеровать больше сотни строк, ведь тянуть мышкой их все будет довольно долго и неудобно.

Второй способ: использование функции

В данном способе мы будем использовать функцию, как можно догадаться по названию подзаголовка. Неопытный пользователь зачастую обходит их стороной, так как ему кажется, что использование функций требует больших знаний, однако это совсем не так. Тем более, пользуясь простой инструкцией, пронумеровать строки в «Экселе» точно получится с первого раза.

Итак, говоря о том, как в «Экселе» пронумеровать сроки с помощью функции, вам необходимо выполнить следующее:

Установить курсор в ту клеточку, с которой должна начинаться нумерация строк.

Теперь, как и в предыдущем способе, необходимо навести курсор в правый нижний угол выделения ячейки и, зажав левую кнопку мыши, протянуть курсор до той ячейки, в которой список должен завершиться.

как в экселе пронумеровать строки автоматически

По итогу вы получите пронумерованные строки. Однако легко заметить, что этот способ мало чем отличается от первого, разница заключается в том, что вам нужно выделять не две ячейки, а всего лишь одну, но нужно дольше вписывать саму формулу. В каких-то ситуациях этот способ все равно может пригодиться, так что не стоит обделять его вниманием.

Третий способ: применение прогрессии

Ранее было сказано, что способы с растягиванием выделения хороши лишь в тех случаях, если нужно пронумеровать немного строк, а для длинных таблиц они не подойдут. Так вот, сейчас мы рассмотрим, как в «Экселе» пронумеровать строки при помощи прогрессии.

Нажать на кнопку «Заполнить», что находится на панели инструментов во вкладке «Главная».

Из списка, который появился, выбрать пункт «Прогрессия».

В появившемся окошке вам необходимо задать все нужные параметры. Расположение ставьте «по столбцам», тип выбирайте «арифметическая», шаг — «1», а предельное значение укажите равное строкам, которые нужно пронумеровать.

как в экселе пронумеровать строки автоматически

После этого указанные вами строки будут пронумерованы. Как можно заметить, данный способ лучше всего справляется в тех случаях, когда надо вписать номера строк в огромное количество ячеек.

Заключение

Теперь вы знаете все три способа, как пронумеровать строки в «Экселе». Предложенные методы в какой-то мере отличаются друг от друга, и это несомненно хорошо, ведь есть из чего выбрать.

Знайка, самый умный эксперт в Цветочном городе

Мнение эксперта

Знайка, самый умный эксперт в Цветочном городе

Если у вас есть вопросы, задавайте их мне!

Задать вопрос эксперту

После выбора объединенных ячеек и нажатия OK теперь выбранные объединенные ячейки были заполнены последовательными номерами, см. Если же вы хотите что-то уточнить, я с радостью помогу!

Безусловно, всё возможно сделать и вручную. Но, когда предстоит проделать немалый объем работы, то просто непозволительно тратить время на действия, которые можно выполнить за считанные минуты. Итак, насчитывается множество методов, чтобы расставить нумерацию в Excel.

Как пронумеровать строки в excel по порядку: все рабочие способы

Далее, как и в первом варианте, просто тянете маркер выделения вниз. В зависимости от того, с какой ячейки вы начинаете, вместо «А1» указываете нужную. В целом, этот подход не даёт никаких преимуществ в сравнении с первым, поэтому делайте как вам удобнее.

Автоматическое нумерация/заполнение объединенных ячеек с помощью Код VBA

Минусом первого и второго методов является то, что приходится растягивать номера на другие строки, что при больших размерах таблицы по вертикали не слишком удобно. Поэтому давайте рассмотрим еще один способ, который избавляет от необходимости выполнять такое действие.

Знайка, самый умный эксперт в Цветочном городе

Мнение эксперта

Знайка, самый умный эксперт в Цветочном городе

Если у вас есть вопросы, задавайте их мне!

Задать вопрос эксперту

Расположение ставьте по столбцам , тип выбирайте арифметическая , шаг — 1 , а предельное значение укажите равное строкам, которые нужно пронумеровать. Если же вы хотите что-то уточнить, я с радостью помогу!

и хотите, чтобы числа вставлялись автоматически при добавлении новых строк данных, преобразуйте диапазон данных в таблицу Excel. Все строки, добавленные в конец таблицы, последовательно нумеруются. Дополнительные сведения см. в статье Создание и удаление таблицы Excel на листе.
Нумерация через один

Небольшое отличие в версиях Excel

  1. Выделяем ячейку, в которой будет стоять единицы и прописываем формулу в специальном поле, как на скриншоте.
  2. Теперь точно также растягиваем ячейку с формулой на необходимое количество ячеек вниз – нумерация продолжится по порядку.

​ Автозамены «Создавать вычисляемые​ которые нужно пронумеровать.​Дважды кликнуть по ячейке.​ сделать.​ но его можно​ ссылка. Например, функция​2​ эта статья была​В первой ячейке поставить​Но, по большому счету,​ – более сложные,​ столбец ПравкаЗаполнитьРяд​ сделать это быстро?​

Третий способ: применение прогрессии

и хотите, чтобы числа вставлялись автоматически при добавлении новых строк данных, преобразуйте диапазон данных в таблицу Excel. Все строки, добавленные в конец таблицы, последовательно нумеруются. Дополнительные сведения см. в статье Создание и удаление таблицы Excel на листе.

Знайка, самый умный эксперт в Цветочном городе

Мнение эксперта

Знайка, самый умный эксперт в Цветочном городе

Если у вас есть вопросы, задавайте их мне!

Задать вопрос эксперту

Например, функция 2 эта статья была В первой ячейке поставить Но, по большому счету, более сложные, столбец Правка Заполнить Ряд сделать это быстро. Если же вы хотите что-то уточнить, я с радостью помогу!

Чем больше способов автоматизации различных операций в Excel вы будете знать, тем больше времени сможете сэкономить в процессе работы с данными. Вы избавите себя от рутинных действий, сможете быстрее решать задачи и повысите эффективность работы.

Нумерация строк с объединёнными ячейками

  • В первом поле необходимо задать начальное числовое значение, с которого продолжится заполнение (например, «1»);
  • Во второй нужно задать следующее значение (например, «2»);
  • Выделите обе области;
  • Теперь при помощи маркера выделения отметьте нужную область таблицы, в которой необходимо сделать нумерацию.

В статье мы разобрали, как в Excel пронумеровать строки автоматически несколькими популярными способами. Все вышеуказанные способы проверены и работоспособны, и я буду только рад, если эти способы помогут и Вам.

Как мы могли заполнить номера серий в списке объединенных ячеек разного размера в Excel? Сначала нам нужно перетащить дескриптор автозаполнения, чтобы заполнить объединенные ячейки, но в этом случае мы получим следующее предупреждающее сообщение и не сможем заполнить объединенные ячейки.

док-заполнить-объединенные-ячейки-1

Поскольку дескриптор заполнения не поддерживает объединенные ячейки, здесь я могу рассказать о некоторых других приемах решения этой проблемы.

Автоматическое нумерация / заполнение объединенных ячеек кодом VBA


стрелка синий правый пузырь Автоматическое нумерация / заполнение объединенных ячеек кодом VBA

Следующий код VBA может помочь вам быстро пронумеровать выбранные объединенные ячейки. Пожалуйста, сделайте следующее:

1. Удерживайте ALT + F11 ключи, и он открывает Окно Microsoft Visual Basic для приложений.

2. Нажмите Вставить > Модулии вставьте следующий код в Окно модуля.

Код VBA: автоматическое нумерация объединенных ячеек

Sub NumberCellsAndMergedCells()
	'Update 20141028
	Dim Rng As Range
	Dim WorkRng As Range
	On Error Resume Next
	xTitleId = "KutoolsforExcel"
	Set WorkRng = Application.Selection
	Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
	Set WorkRng = WorkRng.Columns(1)
	xIndex = 1
	Set Rng = WorkRng.Range("A1")
	Do While Not Intersect(Rng, WorkRng) Is Nothing
		Rng.Value = xIndex
		xIndex = xIndex + 1
		Set Rng = Rng.MergeArea.Offset(1)
	Loop
End Sub

3, Затем нажмите F5 нажмите клавишу для запуска этого кода, и появится диалоговое окно, позволяющее выбрать объединенные ячейки, которые вы хотите заполнить, см. снимок экрана:

док-заполнить-объединенные-ячейки-1

4. Выбрав объединенные ячейки, нажмите OK, теперь выбранные вами объединенные ячейки были заполнены последовательными номерами, см. снимок экрана:

док-заполнить-объединенные-ячейки-1


Статьи по теме:

Как автоматически пронумеровать или перенумеровать после фильтра в Excel?

Как быстро объединить соседние строки с одинаковыми данными в Excel?

Как разделить ячейки и заполнить повторяющиеся значения в Excel?


Лучшие инструменты для работы в офисе

Kutools for Excel Решит большинство ваших проблем и повысит вашу производительность на 80%

  • Снова использовать: Быстро вставить сложные формулы, диаграммы и все, что вы использовали раньше; Зашифровать ячейки с паролем; Создать список рассылки и отправлять электронные письма …
  • Бар Супер Формулы (легко редактировать несколько строк текста и формул); Макет для чтения (легко читать и редактировать большое количество ячеек); Вставить в отфильтрованный диапазон
  • Объединить ячейки / строки / столбцы без потери данных; Разделить содержимое ячеек; Объединить повторяющиеся строки / столбцы… Предотвращение дублирования ячеек; Сравнить диапазоны
  • Выберите Дубликат или Уникальный Ряды; Выбрать пустые строки (все ячейки пустые); Супер находка и нечеткая находка во многих рабочих тетрадях; Случайный выбор …
  • Точная копия Несколько ячеек без изменения ссылки на формулу; Автоматическое создание ссылок на несколько листов; Вставить пули, Флажки и многое другое …
  • Извлечь текст, Добавить текст, Удалить по позиции, Удалить пробел; Создание и печать промежуточных итогов по страницам; Преобразование содержимого ячеек в комментарии
  • Суперфильтр (сохранять и применять схемы фильтров к другим листам); Расширенная сортировка по месяцам / неделям / дням, периодичности и др .; Специальный фильтр жирным, курсивом …
  • Комбинируйте книги и рабочие листы; Объединить таблицы на основе ключевых столбцов; Разделить данные на несколько листов; Пакетное преобразование xls, xlsx и PDF
  • Более 300 мощных функций. Поддерживает Office/Excel 2007-2021 и 365. Поддерживает все языки. Простое развертывание на вашем предприятии или в организации. Полнофункциональная 30-дневная бесплатная пробная версия. 60-дневная гарантия возврата денег.

вкладка kte 201905


Вкладка Office: интерфейс с вкладками в Office и упрощение работы

  • Включение редактирования и чтения с вкладками в Word, Excel, PowerPoint, Издатель, доступ, Visio и проект.
  • Открывайте и создавайте несколько документов на новых вкладках одного окна, а не в новых окнах.
  • Повышает вашу продуктивность на 50% и сокращает количество щелчков мышью на сотни каждый день!

офисный дно

Комментарии (10)


Оценок пока нет. Оцените первым!

Like this post? Please share to your friends:
  • Как пронумеровать страницы без титульного листа в word 2007
  • Как пронумеровать столбец в таблице excel
  • Как пронумеровать столбец в excel по порядку автоматически сверху вниз экселе
  • Как пронумеровать столбец в excel по порядку автоматически если
  • Как пронумеровать список word