Excel последняя измененная ячейка

Excel для Microsoft 365 Excel 2021 Excel 2019 Excel 2016 Excel 2013 Excel 2010 Excel 2007 Еще…Меньше

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

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

Поиск последней ячейки с данными или форматированием на нем

  • Чтобы найти последнюю ячейку с данными или форматированием, щелкните в любом месте на нем и нажмите CTRL+END.

Примечание: Чтобы выбрать последнюю ячейку в строке или столбце, нажмите клавишу END, а затем клавишу СТРЕЛКА ВПРАВО или СТРЕЛКА ВНИЗ.

Очистка всего форматирования между последней ячейкой и данными

  1. Выполните одно из указанных ниже действий.

    • Чтобы выбрать все столбцы справа от последнего столбца с данными, щелкните первый заголовок столбца, нажмите и удерживайте нажатой кнопку CTRL, а затем щелкните заголовки столбцов, которые нужно выбрать.

      Совет: Можно также щелкнуть первый заголовок столбца и нажать CTRL+SHIFT+END.

    • Чтобы выбрать все строки под последней строкой с данными, щелкните заголовок первой строки, нажмите и удерживайте нажатой кнопку CTRL, а затем щелкните заголовки строк, которые нужно выбрать.

      Совет: Можно также щелкнуть заголовок первой строки и нажать CTRL+SHIFT+END.

  2. На вкладке Главная в группе Редактирование щелкните стрелку рядом с кнопкой Очистить Изображение кнопкии выберите очистить все.

  3. Сохраните лист.

  4. Закроем таблицу.

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

Дополнительные сведения

Вы всегда можете задать вопрос специалисту Excel Tech Community или попросить помощи в сообществе Answers community.

К началу страницы

Нужна дополнительная помощь?

Иногда вам может потребоваться удалить пустые строки и столбцы и сбросить последнюю ячейку вашего рабочего листа для экономии бумаги при печати. В этом руководстве представлены некоторые приемы для сброса последней ячейки в Excel.

Удалите ненужные пустые строки и столбцы

Сбросить последнюю ячейку с помощью VBA


стрелка синий правый пузырь Удалите ненужные пустые строки и столбцы

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

1. Нажмите Ctrl + End ключи, чтобы найти последнюю ячейку рабочего листа. Смотрите скриншот:

документ-сброс-последняя-ячейка-1

2. Затем нажмите Ctrl , чтобы выбрать ячейки диапазона, которые вы не хотите печатать.

документ-сброс-последняя-ячейка-2

3. Затем нажмите Главная > Очистить > Очистить все. Смотрите скриншот:

документ-сброс-последняя-ячейка-3

4. Сохраните текущую книгу, нажав Файл (или кнопка Office) > Сохранить.

5. Затем вы можете нажать Ctrl + End чтобы проверить последнюю ячейку.

документ-сброс-последняя-ячейка-4


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

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

1. Нажмите Alt + F11 одновременно, а Microsoft Visual Basic для приложений окно выскакивает.

2. Нажмите Вставить > Модули, затем вставьте ниже код VBA в всплывающее окно модуля.

VBA: сбросить последнюю ячейку.

Sub ResetLastCell()
	ActiveSheet.UsedRange
End Sub

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

Внимание: Этот код VBA не может работать, если пустые ячейки имеют форматы ячеек.


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

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

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

вкладка kte 201905


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

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

офисный дно

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


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

Добрый день,

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

Подскажите пожалуйста, как это сделать?
Спасибо за помощь!


Каков вопрос…

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = 0
    Target.Offset(, 1) = Date
    Application.EnableEvents = -1
End Sub

Я, как всегда, чертовски адекватен… Email: pilipnikop@yandex.ua WM Z206653985942, R334086032478, U238399322728, E332314026771


Цитата: KuklP от 26.02.2012, 09:07
Каков вопрос…
Private Sub Worksheet_Change(ByVal Target As Range)
   Application.EnableEvents = 0
   Target.Offset(, 1) = Date
   Application.EnableEvents = -1
End Sub

Спасибо за отклик!
Прошу прощения за возможно глупый вопрос (с макросами мало опыта)
Я копирую код, создаю module. Сохраняю книгу с поддержкой макросов.
Далее в окне макросов ничего не появляется. Если убрать privat из кода, то всё ОК, но макрос не работает (cant execute… пишет)
Как работать с кодом, поскажите!
Спасибо!)


Это надо скопировать в модуль листа, а не в отдельный модуль.

Я, как всегда, чертовски адекватен… Email: pilipnikop@yandex.ua WM Z206653985942, R334086032478, U238399322728, E332314026771


Цитата: KuklP от 26.02.2012, 09:07
Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = 0
    Target.Offset(, 1) = Date
    Application.EnableEvents = -1
End Sub

Здравствуйте Сергей.
Подскажете пожалуйста, как (в данном примере) определить, изменилось ли содержание ячейки после её активации?  Есть ли такой код?
Ибо я использую скрытый доп. столбец для сравнения.  :)
Спасибо.

Может и я на что сгожусь … Если сгодился, можете меня по+благодарить+.


Привет, Васильич. Не понял вопроса. Этот код срабатывает именно на изменение ячейки. Если речь о том, что вошли в режим редактирования и ничего не изменили, то:
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim a
    Application.EnableEvents = 0
    a = Target.Value
    Application.Undo
    If Target <> a Then
        Target.Offset(, 1) = Date
        Target = a
    End If
    Application.EnableEvents = -1
End Sub

Я, как всегда, чертовски адекватен… Email: pilipnikop@yandex.ua WM Z206653985942, R334086032478, U238399322728, E332314026771


Спасибо записал.
Все решает строчка
Application.Undo

Может и я на что сгожусь … Если сгодился, можете меня по+благодарить+.


 

Как в ячейке на Листе2 отразить данные последней заполненной ячейки диапозона из Листа1 (например:выделенный дапозон Лист1!А1:А10, а последние данные в ячейке А8, т.е. диапозон А1:А8 заполнен и нужны данные ячейки А8)?

 

genyaa

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

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

Если заполняются все смежные ячейки (нет пустых ячеек между заполненными), то    

  =ИНДЕКС(Лист1!A:A;СЧЁТЗ(Лист1!A:A))    

  вернет последнее заполненное значение в столбце А на листе Лист1 (точнее, это бдует ссылка на последнюю заполненную ячейку).

 

а если есть пустые (незаполненные? значения

 

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

 

Последняя заполненная ячейка в строке 1 (точнее ее значение):  
{=ИНДЕКС(1:1;МАКС(СТОЛБЕЦ(1:1)*НЕ(ЕПУСТО(1:1))))}  
Про фигурные скобки в формуле рассказывать?

 

конечно рассказывать! если я чего-то не знаю — то всегда не против знать!.  
Спасибо! не надеялась что ответит кто-то через год от исходного вопроса))

 

{quote}{login=шпилька}{date=12.08.2008 10:14}{thema=}{post}конечно рассказывать! если я чего-то не знаю — то всегда не против знать!.  
Спасибо! не надеялась что ответит кто-то через год от исходного вопроса)){/post}{/quote}А какая разница? Вопрос-то новый (для Вас), хоть и в старой теме.  
Фигурные скобки означают «формулу массива». Вводится нажатием стрл+шифт+ентер. Без такого ввода будет выдавать ошибку или неправильно считать.

 

Забыл добавить: фигурные скобки не надо набирать, они сами появятся после ввода (правильного)

 

Поняла, что это какойто  массив. И что просто так эту формулу не скопировать. Фигурные скобки эксель ставит сам с кнтр-ш-ентр.  
Но формулу то все-равно рассказывайте. Что там к чему.  
А можно попросить просто написать ее вот сюда? Так понять проще  
(пример в файле)

 

** ТУРБО-ЁЖ ** *ЕХСЕL@ХАКЕР.RU* ==============

Гость

{quote}{login=шпилька}{date=12.08.2008 10:45}{thema=}{post}  
А можно попросить просто написать ее вот сюда?{/post}{/quote}  

  Пожалуйста. Формула Лузер™’а inside.

 

вообще говоря.. не нравится мне с массивом. Любой попавшийся «юзер» файла, случайно зайдет в ячейку, (допустим формулу глянуть), нажмет ввод.. и нет массива.  
может как-то решить эту задачу с другой стороны рассматривая..    
как объяснить.. Обычно все формулы двигаются слева направо. т.е. ищет значение правее формулы..и до конца строки    
а если задать чтобы поиск шел от конца строки до первого заполненного. Так можно?

 

{quote}{login=шпилька}{date=12.08.2008 10:45}{thema=}{post}А можно попросить просто написать ее вот сюда? Так понять проще  
(пример в файле){/post}{/quote}Золотые слова.  
Итак, начнем с конца.  
ЕПУСТО(1:1) — выдает массив значений истина (если пустая) или ложь (если что-то есть) для всех ячеек строки 1.  
НЕ(ЕПУСТО(1:1)) — инвертирует массив: где была ложь, ставит истину и наоборот.  
Таким образом мы имеем массив с ЛОЖЬ (там где пустая) и ИСТИНА (где заполнено)  
СТОЛБЕЦ(1:1) — возвращает массив номеров столбцов в строке 1 (от 1 до 256 для 2003 офиса)  
Перемножаем эти два массива (помня о том, что истина=1, а ложь=0)  
СТОЛБЕЦ(1:1)*НЕ(ЕПУСТО(1:1))  
Молучаем массив с нулями (если ячейка пустая) и номером столбца (если заполнена)  
МАКС, понятное дело, выбирает из этого максимальный номер столбца, т.е. последний заполненный.  
Индекс выбирает значение этого столбца.  
УФ! Вроде все.

 

это я же, выше.  
Ну да. Я вот сама же на enter и попалась. Все исправила на 6 строку и нажала… ввод)) и получила тут же ноль))  
поэтому попросила вписать формулу))

 

{quote}{login=}{date=12.08.2008 11:13}{thema=}{post}вообще говоря.. не нравится мне с массивом. Любой попавшийся «юзер» файла, случайно зайдет в ячейку, (допустим формулу глянуть), нажмет ввод.. и нет массива.  
может как-то решить эту задачу с другой стороны рассматривая..    
как объяснить.. Обычно все формулы двигаются слева направо. т.е. ищет значение правее формулы..и до конца строки    
а если задать чтобы поиск шел от конца строки до первого заполненного. Так можно?{/post}{/quote}1. Защитите лист (хоть одну ячейку).  
2. Про «обычно» не знаю. У меня ищет там, где указано.

 

Guest

Гость

#15

12.08.2008 11:21:16

о! «защитите»!  
Пошла внедрять!)  
Спасибо огромное за помощь в эксел-головоломках!

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

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

  1. Перейти к Файл
  2. Выбирать Опции.
  3. Выбирать Надстройки.
  4. Выбирать Надстройки COM в Управлять
  5. Проверять Узнать
  6. Под Узнать вкладка, выберите Очистить лишнее форматирование ячеек.

Давайте посмотрим на процесс более подробно!

Перейти к Файл вкладка в меню ленты вашего файла Excel.

Щелкните значок Файл вкладка, чтобы перейти к Опции (отображается внизу боковой панели).

Когда откроется окно параметров Excel, выберите Надстройки вариант на боковой панели.

Com Addins Раздел

Затем выберите Надстройки COM из Управлять коробка справа.

Как найти и сбросить последнюю ячейку на листе Excel, чтобы удалить форматирование

Ищите Узнать надстройки, выберите ее и нажмите ОК. Вкладка Запрос теперь должна быть видна на ленте.

Очистить лишнее форматирование

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

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

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

Читайте дальше: Как найти процентное изменение в Excel?

Надеюсь, это помогло.

Вкладка .

Понравилась статья? Поделить с друзьями:
  • Excel получить максимальное число
  • Excel пользовательская функция с аргументом
  • Excel последняя заполненная ячейка на листе
  • Excel получить координаты ячеек
  • Excel пользовательская функция для всех книг