Note: The other languages of the website are Google-translated. Back to English

Как повторять значение ячейки, пока новое значение не будет видно или достигнуто в Excel?

Как показано на левом снимке экрана, вам нужно повторять значение ячейки, пока новое значение не появится или не будет достигнуто в столбце Excel. В этом случае вам нужно повторять значение A в следующей пустой ячейке, пока не будет достигнуто значение B, и повторять значение B до тех пор, пока не будет видно значение C. Как этого добиться? Эта статья вам поможет.

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


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

Вы можете использовать формулы для повторения значения ячейки, пока новое значение не появится в Excel. Пожалуйста, сделайте следующее.

1. В новом столбце выберите пустую ячейку, которая находится рядом с ячейкой (E2), вам нужно повторить ее значение, затем введите формулу = E2 в панель формул и нажмите клавишу Enter. Смотрите скриншот:

2. Выберите следующую ячейку (F3) в столбце справки, введите формулу = ЕСЛИ (E3 = ""; F2, E3) в панель формул, затем нажмите Enter .

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


Легко повторяйте значение ячейки, пока не будет достигнуто новое значение в Excel:

Компания Заполнить пустые ячейки полезности Kutools for Excel может помочь вам повторять значение ячейки в списке до тех пор, пока новое значение не появится или не будет достигнуто в Excel, как показано на скриншоте ниже.
Скачайте и попробуйте прямо сейчас! (30- дневная бесплатная трасса)


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

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

1. Выберите столбец, в котором нужно повторить значение ячейки, затем нажмите F5 , чтобы открыть Перейти к диалоговое окно, затем щелкните Особый кнопку.

2. в Перейти к специальному в диалоговом окне выберите Пробелы и нажмите OK кнопка. Смотрите скриншот:

3. Теперь все пустые ячейки в выбранном столбце выделены, введите знак равенства. =, нажмите клавишу со стрелкой вверх один раз, а затем нажмите Ctrl + Enter ключи одновременно.

Затем вы можете увидеть, что значение ячейки в выбранном столбце повторяется до тех пор, пока не появится новое значение, как показано ниже:


Повторяйте значение ячейки до тех пор, пока новое значение не появится или не будет достигнуто с помощью кода VBA

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

1. Выберите диапазон столбца, в котором необходимо повторять значение ячейки, пока не появится новое значение, затем нажмите другой + F11 клавиши одновременно, чтобы открыть Microsoft Visual Basic для приложений окно.

2. в Microsoft Visual Basic для приложений окна, нажмите Вставить > Модули. Затем скопируйте и вставьте приведенный ниже код VBA в окно модуля.

Код VBA: повторяйте значение ячейки, пока новое значение не появится в Excel

Sub FillDown()
Dim xRng As Range
Dim xRows As Long, xCols As Long
Dim xRow As Integer, xCol As Integer
Set xRng = Selection
xCols = xRng.Columns.CountLarge
xRows = xRng.Rows.CountLarge
For xCol = 1 To xCols
  For xRow = 1 To xRows - 1
    If xRng.Cells(xRow, xCol) <> "" Then
      xRng.Cells(xRow, xCol) = xRng.Cells(xRow, xCol).Value
      If xRng.Cells(xRow + 1, xCol) = "" Then
        xRng.Cells(xRow + 1, xCol) = xRng.Cells(xRow, xCol).Value
      End If
    End If
  Next xRow
Next xCol
End Sub

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


Легко повторяйте значение ячейки до тех пор, пока новое значение не появится или не достигнет всего несколькими щелчками мыши

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

Перед применением Kutools for Excel, Пожалуйста, сначала скачайте и установите.

1. Выберите диапазон столбцов, в котором необходимо повторить значение ячейки, затем щелкните Кутулс > Вставить > Заполнить пустые ячейки. Смотрите скриншот:

2. в Заполнить пустые ячейки в диалоговом окне выберите На основе ценностей в Заполнить раздел, выбрать вниз вариант в Опции раздел и, наконец, щелкните OK кнопка. Смотрите скриншот:

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

  Если вы хотите получить бесплатную пробную версию (30-день) этой утилиты, пожалуйста, нажмите, чтобы загрузить это, а затем перейдите к применению операции в соответствии с указанными выше шагами.


Демо: легко повторяйте значение ячейки, пока новое значение не будет видно или достигнуто с помощью Kutools for 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% и сокращает количество щелчков мышью на сотни каждый день!
офисный дно
Сортировать комментарии по
Комментарии (6)
Оценок пока нет. Оцените первым!
Этот комментарий был сведен к минимуму модератором на сайте
Большое спасибо, фантастика
Этот комментарий был сведен к минимуму модератором на сайте
Dim xRow As Long, xCol As Long
если у вас очень большой набор данных
Этот комментарий был сведен к минимуму модератором на сайте
Unter Office 365 (Excel 2016) функциональные инструменты Kutools for Excel nicht, um die Zellenwerte zu wiederholen und Excel hängt sich auf und reagiert nicht mehr
Этот комментарий был сведен к минимуму модератором на сайте
Спасибо, брат. Оно работает
Этот комментарий был сведен к минимуму модератором на сайте
Большое спасибо, это работает просто идеально!
Этот комментарий был сведен к минимуму модератором на сайте
Как только я изменил формулу на шаге 2 для ячейки F3 на =IF(E2="",F2,E2), все заработало отлично.
Здесь еще нет комментариев
Оставляйте свои комментарии
Публикация как гость
×
Оценить этот пост:
0   Характеристики
Предлагаемые места

Подписывайтесь на Нас

Copyright © 2009 - www.extendoffice.ком. | Все права защищены. Питаться от ExtendOffice, | Карта сайта
Microsoft и логотип Office являются товарными знаками или зарегистрированными товарными знаками Microsoft Corporation в США и / или других странах.
Защищено Sectigo SSL