Excel: Как развернуть ячейку, чтобы показать все содержимое при клике
В некоторых случаях, если содержимое ячейки длиннее ширины самой ячейки и в соседних ячейках есть значения, отображается только часть содержимого, как показано на скриншоте ниже. Чтобы избежать изменения ширины и высоты ячеек, вы можете кликнуть по ячейке и просмотреть всё содержимое в строке формул. Но что делать, если строка формул скрыта или короче, чем содержимое? Здесь представлены два метода, которые позволяют показывать содержимое ячейки в текстовом поле при клике.
Развернуть ячейку для отображения всего содержимого путем вставки текстового поля ActiveX Controls
Примечание: методы, описанные в этом руководстве, протестированы в Excel 2021, возможны некоторые различия в разных версиях Excel.
1. Активируйте лист, на котором хотите развернуть ячейку, нажмите Разработчик > Вставить > Текстовое поле (Элементы управления ActiveX).
Если на ленте нет вкладки Разработчик, пожалуйста, сначала отобразите её, просмотрите это руководство Как Показать/Отобразить Вкладку Разработчик На Ленте Excel
2. Затем перетащите курсор, чтобы нарисовать текстовое поле с шириной и высотой, достаточной для отображения самого длинного содержимого ячеек. Запомните имя этого текстового поля, здесь это TextBox1.
3. Щелкните правой кнопкой мыши по текстовому полю и выберите Свойства из контекстного меню. Затем в Свойства панели выберите Да из выпадающих списков в Многострочный и Перенос слов разделах. Затем закройте Свойства панель.
>>> 
Или вы можете выбрать Да из выпадающего списка в разделе Автомасштабирование на панели Свойства, текстовое поле будет автоматически изменять размер в зависимости от длины содержимого ячейки, на которую вы кликаете.
4. Щелкните правой кнопкой мыши по имени листа на строке состояния и выберите Просмотр кода из контекстного меню.
5. В окне Microsoft Visual Basic for Applications скопируйте и вставьте следующий код в пустой скрипт.
VBA: Развернуть ячейку для отображения содержимого
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'UpdatebyExtendoffice
Dim xRgAddress As String
xRgAddress = "A1:B4" 'the range this VBA work, if you leave it is blank, it work for whole sheet
If xRgAddress = "" Then
With TextBox1
.Top = Target.Top
.Left = Target.Offset(, 1).Left
.Text = Target.Text
.Visible = True
End With
Else
If Intersect(Target, Range(xRgAddress)) Is Nothing Then
TextBox1.Visible = False
Else
With TextBox1
.Top = Target.Top
.Left = Target.Offset(, 1).Left
.Text = Target.Text
.Visible = True
End With
End If
End If
End Sub
Обратите внимание, что TextBox1 — это имя текстового поля, которое вы нарисовали, а A1:B4 — это диапазон, в котором работает этот код, измените их по необходимости.
6. Вернитесь на лист, нажмите Разработчик > Режим конструктора чтобы выйти из режима конструктора.
Теперь, когда вы кликаете по ячейке, рядом с ней появляется текстовое поле, и оно показывает всё содержимое ячейки.
Развернуть ячейку для отображения всего содержимого с помощью расширенной строки формул Kutools для Excel
Если у вас установлен Kutools для Excel, предоставленная им расширенная строка формул покажет всё содержимое ячейки во всплывающем окне при клике, если вы активировали её, нажав Kutools > Расширенная строка формул.
Советы:
1. С помощью расширенной строки формул можно не только просматривать содержимое активной ячейки, но и редактировать содержимое ячейки в расширенной строке формул.
2. Вы можете изменить размер расширенной строки формул, перетаскивая правый нижний угол панели.
3. Если вы выберете более одной ячейки, в расширенной строке формул будут показаны только данные первой ячейки из выделенных.
Больше информации о расширенной строке формул вы найдете в её руководстве.
Другие операции (Статьи)
Как отключить автозаполнение
В Excel есть опция, которая может остановить автозаполнение.
Как уменьшить размер файла Excel?
Иногда на открытие или сохранение файла Excel уходит несколько минут, если файл слишком большой. Для решения этой проблемы в данном руководстве рассказывается, как уменьшить размер файла Excel, удалив ненужное содержимое или форматы, которые никогда не использовались.
Как автоматически заполнять ячейки из другой таблицы
В этом руководстве рассматривается, как автоматически заполнять другие ячейки столбца из таблицы на другом листе после ввода значения одного столбца.
Как применить заливку к нечётным или чётным (чередующимся) строкам/столбцам в Excel?
При проектировании рабочего листа многие люди предпочитают применять заливку к нечётным или чётным (чередующимся) строкам или столбцам, чтобы сделать рабочий лист более наглядным. Эта статья покажет вам два способа применения заливки к нечётным или чётным строкам/столбцам в Excel.
Лучшие инструменты для повышения продуктивности в Office
Повысьте свои навыки работы в Excel с помощью Kutools для Excel и ощутите эффективность на новом уровне. Kutools для Excel предлагает более300 расширенных функций для повышения производительности и экономии времени. Нажмите здесь, чтобы выбрать функцию, которая вам нужнее всего...
Office Tab добавляет вкладки в Office и делает вашу работу намного проще
- Включите режим вкладок для редактирования и чтения в Word, Excel, PowerPoint, Publisher, Access, Visio и Project.
- Открывайте и создавайте несколько документов во вкладках одного окна вместо новых отдельных окон.
- Увеличьте свою продуктивность на50% и уменьшите количество щелчков мышью на сотни ежедневно!
Все надстройки Kutools. Один установщик
Пакет Kutools for Office включает надстройки для Excel, Word, Outlook и PowerPoint, а также Office Tab Pro — идеально для команд, работающих в разных приложениях Office.
- Комплексный набор — надстройки для Excel, Word, Outlook и PowerPoint плюс Office Tab Pro
- Один установщик, одна лицензия — настройка занимает считанные минуты (MSI-совместимо)
- Совместная работа — максимальная эффективность между приложениями Office
- 30-дневная полнофункциональная пробная версия — без регистрации и кредитной карты
- Лучшее соотношение цены и качества — экономия по сравнению с покупкой отдельных надстроек