Эксель ячейка по размеру текста

Длинный текст в ячейке Excel: как его скрыть или уместить по высоте. ✔

Здравствуйте.

Не знаю почему, но при работе с Excel у многих не искушенных пользователей возникает проблема с размещением длинного текста: он либо не умещается по ширине (высоте), либо “налезает” на другие ячейки. В обоих случаях смотрится это не очень. 👀

Чтобы уместить текст и корректно его отформатировать — в общем-то, никаких сложных инструментов использовать не нужно: достаточно активировать функцию “переноса по словам” . А далее просто подправить выравнивание и ширину ячейки.

Собственно, ниже в заметке покажу как это достаточно легко можно сделать.

1) скрины в статье из Excel 2019 (в Excel 2010, 2013, 2016 – все действия выполняются аналогичным образом);

Вариант 1

И так, например в ячейке B3 (см. скрин ниже) у нас расположен длинный текст (одно, два предложения). Наиболее простой способ “убрать” эту строку из вида: поставить курсор на ячейку C3 (следующую после B3) и написать в ней любой символ, подойдет даже пробел .

Обратите внимание на скриншот ниже: справа показано, что строка из ячейки B3 была скрыта, т.к. в C3 появилось три единички.

Написание текста в следующей ячейке

Кстати, чтобы увидеть полный текст, расположенной в B3 — достаточно навести на нее курсор и посмотреть в строку формул.

Чтобы увидеть полный текст.

Вариант 2

Второй способ — это уместить текст в ячейку, расширив при этом высоту ячейки (т.е. ячейка сама станет выше, и текст в ней можно будет прочитать целиком).

Делается это не сложно: сначала нужно выбрать нашу ячейку с текстом (B3), нажать по ней правой кнопкой мышки и выбрать в меню “Формат ячеек” .

Формат ячеек (правый клик по ячейке)

После перейти во вкладку “Выравнивание” и поставить галочку рядом с пунктом “Переносить по словам” .

Переносить по словам

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

Что получилось в итоге

Вариант 3

Если вы не хотите, чтобы высота строк (ячеек) менялась в большую строну — можно прибегнуть к другому варианту:

  • сначала нужно выделить несколько ячеек по высоте (вместе с нашим текстом B3);
  • далее использовать инструмент “Объединить ячейки” .

Выделение нескольких ячеек

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

Обратите внимание, что для корректного размещения текста в ячейке необходимо использовать инструмент “Перенести текст” (стрелка 2 на скрине ниже).

Текст удачно вписался в одну большую ячейку

Вариант 4

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

Текст по вертикали

PS

Как еще один вариант: можно вместо текста разместить картинку (скриншот). В некоторых случаях этот способ куда удобнее, чем все вышеприведенные.

Источник: ocomp.info

Автоподбор в EXCEL ширины столбца и высоты строки по содержимому ячеек

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

Пусть имеется таблица с ячейками заполненными текстовыми значениями.

Автоподбор ширины столбца

Как видно из рисунка выше, текстовые значения в ячейках А2 и А3 отображаются не полностью, т.к. мешает текст в столбце B . Нам необходимо, чтобы содержимое всех ячеек в столбце A отображалось полностью. Для этого необходимо сделать ширину столбца A достаточной для отображения самого длинного текста в столбце. Делается это элементарно: подводим указатель мыши к разделу столбцов А и B (на сером заголовке столбцов), курсор примет следующий вид:

Делаем двойной клик мышкой и, Voila, ширина столбца стала достаточной для отображения значений во всех ячейках столбца (с учетом скрытых строк).

Если нужно выровнять ширину по содержимому у сразу нескольких столбцов, то делаем следующее:

  • выделяем необходимые столбцы (за их серые заголовки);
  • подводим курсор к любому разделу выделенных столбцов и дважды кликаем.
  • Выберите столбец или столбцы, ширину которых нужно изменить;
  • На вкладке Главная в группе Ячейки выберите команду Формат ;
  • В группе Размер ячейки выберите пункт Автоподбор ширины столбца .

Автоподбор высоты строки

Если ячейки содержат значения с очень большой длиной строки (например, если длина текстовой строки без переносов сравнима с шириной видимой части листа), то ширина столбца может стать слишком большой, работать с данными будет не удобно. В этом случае нужно выделить ячейки и включить опцию Переносить по словам через Формат ячеек (или через меню Главная/ Выравнивание/ Перенос текста ).

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

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

После этого текстовое значение будет отображено в ячейке полностью:

Реальный пример

Теперь применим рассмотренный метод в реальной ситуации – отредактируем таблицу, созданную путем копирования данных из MS ACCESS. Скопируем через Буфер обмена какую-нибудь таблицу из MS ACCESS на лист EXCEL.

Обратите внимание, что у ячеек, в которые мы вставили значения из Буфера обмена , включена опция Переносить по словам, хотя, по умолчанию, она отключена (EXCEL сам включил ее при вставке). Кроме того, EXCEL не стал изменять ширину столбцов, установленную по умолчанию, а была изменена только высота строк, чтобы полностью отобразить все значения. Такое форматирование таблицы не всегда устраивает пользователя. Используя вставленную таблицу, решим 2 задачи.

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

  • выделите вставленные значения (для этого выделите любую ячейку таблицы и нажмите CTRL+A (выделится текущая область ), если таблица не содержит пустых строк и столбцов, то будут выделены все вставленные значения);
  • выключите опцию Переносить по словам (через меню Главная/ Выравнивание/ Перенос текста );
  • высота ячеек будет уменьшена так, чтобы отображать только одну строку, как следствие часть значений станет невидна;

  • выделите столбцы А , B и С за серые заголовки;
  • подведите указатель мыши к разделу столбцов А и B (на сером заголовке столбцов) и дважды кликните.

Задача решена: содержимое всех ячеек полностью отображается.

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

  • задайте требуемую ширину столбцов А , B и С ;
  • опцию Переносить по словам не выключайте (включите);

  • выделите все строки, содержащие вставленные значения, или все ячейки листа (все ячейки листа можно выделить нажав кнопку Выделить все в левом верхнем углу листа или дважды нажав CTRL+A );
  • подведите указатель мыши к разделу любых двух заполненных строк (на сером заголовке столбцов) и дважды кликните.

Задача решена: содержимое всех ячеек полностью отображается.

Случай с объединенными ячейками

В случае, если две или несколько ячеек объединены в одну, то рассмотренный подход не сработает. Можно ли осуществить автоподбор высоты строки в случае объединенных ячеек? Об этом читайте в одноименной статье Автоподбор высоты строки по содержимому при объединении ячеек .

Читайте также:  Сцепить в excel диапазон ячеек

Источник: excel2.ru

Расширение ячеек в Microsoft Excel

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

Процедура расширения

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

Способ 1: простое перетаскивание границ

Самый простой и интуитивно понятный вариант увеличить размеры ячейки – это перетащить границы вручную. Это можно сделать на вертикальной и горизонтальной шкале координат строк и столбцов.

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

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

    Способ 2: расширение нескольких столбцов и строк

    Существует также вариант расширить несколько столбцов или строк одновременно.

    1. Выделяем одновременно несколько секторов на горизонтальной и вертикальной шкале координат.

    Устанавливаем курсор на правую границу самой правой из ячеек (для горизонтальной шкалы) или на нижнюю границу самой нижней ячейки (для вертикальной шкалы). Зажимаем левую кнопку мыши и тянем появившуюся стрелочку соответственно вправо или вниз.

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

    Также можно произвести ручной ввод размера ячеек, измеряемый в числовых величинах. По умолчанию высота имеет размер 12,75 единиц, а ширина – 8,43 единицы. Увеличить высоту можно максимум до 409 пунктов, а ширину до 255.

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

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

      Выделяем сектор или диапазон вертикальной шкалы координат. Кликаем по этому участку правой кнопкой мыши. В контекстном меню выбираем пункт «Высота строки…».

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

    Способ 4: ввод размера ячеек через кнопку на ленте

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

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

  • Переходим во вкладку «Главная», если находимся в другой. Кликаем по кнопке «Формат», которая располагается на ленте в группе инструментов «Ячейки». Открывается список действий. Поочередно выбираем в нем пункты «Высота строки…» и «Ширина столбца…». После нажатия на каждый из этих пунктов будут открываться небольшие окошки, о которых шёл рассказ при описании предыдущего способа. В них нужно будет ввести желаемую ширину и высоту выделенного диапазона ячеек. Для того, чтобы ячейки увеличились, новая величина этих параметров должна быть больше, чем установленная ранее.
  • Способ 5: увеличение размера всех ячеек листа или книги

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

      Для того, чтобы совершить данную операцию, следует, прежде всего, выделить нужные элементы. Для того, чтобы выделить все элементы листа, можно просто нажать сочетание клавиш на клавиатуре Ctrl+A. Существует и второй вариант выделения. Он предполагает нажатие на кнопку в виде прямоугольника, которая расположена между вертикальной и горизонтальной шкалой координат Excel.

  • После того, как выделили любым из этих способов лист, жмем на уже знакомую нам кнопку «Формат» на ленте и производим дальнейшие действия точно так же, как описано в предыдущем способе с переходом по пунктам «Ширина столбца…» и «Высота строки…».
  • Аналогичные действия производим для увеличения размера ячеек всей книги. Только для выделения всех листов используем другой прием.

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

  • После того, как листы выделены, производим действия на ленте с использованием кнопки «Формат», которые были описаны в четвертом способе.
  • Способ 6: автоподбор ширины

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

      Выделяем диапазон, к которому желаем применить свойства автоподбора ширины. Кликаем по выделению правой кнопкой мыши. Открывается контекстное меню. Выбираем в нем пункт «Формат ячеек…».

  • Открывается окно форматирования. Переходим во вкладку «Выравнивание». В блоке настроек «Отображение» устанавливаем галочку около параметра «Автоподбор ширины». Жмем на кнопку «OK» в нижней части окна.
  • После этих действий, какой бы длинной запись не была, но она будет умещаться в ячейку. Правда, нужно учесть, что если в элементе листа слишком много символов, и пользователь не будет расширять его одним из предыдущих способов, то эта запись может стать очень мелкой, вплоть до нечитаемой. Поэтому довольствоваться исключительно данным вариантом для того, чтобы уместить данные в границы, не во всех случаях приемлемо. Кроме того, следует сказать, что этот способ работает только с текстом, но не с числовыми значениями.

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

    Отблагодарите автора, поделитесь статьей в социальных сетях.

    Источник: lumpics.ru

    Форматирование ячеек в Excel: настраиваем текст

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

    Читайте также:  Как в excel умножить ячейку на число

    Для форматирования в Эксель предусмотрены следующие пути:

    1. Через команды на ленте Главная – Шрифт и Главная – Выравнивание
    2. С помощью контекстной мини-панели
    3. В диалоговом окне «Формат ячеек»

    Как изменить шрифт Excel

    Когда вы создаёте новый лист, шрифт в ячейках по умолчанию – Calibri (начиная с MS Office 2007) размером 11 пунктов. Напомню, 72 пункта – это один дюйм. В старых версиях по умолчанию установлен шрифт Arial, 10 пунктов.

    Чтобы изменить вид шрифта, или его размер, выделите ячейки и выберите из списка на ленте: Главная – Шрифт . В списке легко сделать выбор, ведь каждое название начертано своим шрифтом.

    Выбор шрифта на ленте Excel 2013

    Еще один способ – выделить нужный диапазон и кликнуть правой кнопкой мыши. Возле контекстного меню появится мини-панель с такими же раскрывающимися списками выбора шрифта и размера.

    Мини-панель Эксель

    Откройте окно Формат ячеек любым способом, например, нажмите Ctrl+1 . В окне перейдите на вкладку Шрифт , выберите вид и размер шрифта в соответствующих полях.

    Изменение шрифта в окне «Формат ячеек»

    Старайтесь использовать стандартные шрифты Windows, например, Calibri, Arial, Times New Roman, Verdana, Century Gothic и др. Если используемый вами шрифт не установлен на других компьютерах, файл Эксель на них отобразится неправильно. Хотя, никогда не поздно установить нужный шрифт!

    Как выбрать способы начертания Excel

    Иногда нужно поставить какие-то акценты в содержимом ячейки. Например, сделать его полужирным, наклонным, подчеркнуть и др. Чтобы применить такой формат ко всей ячейке – выделите всю клетку. Если хотите форматировать только часть текста – сделайте двойной клик внутри ячейки и мышью выделите ту часть, которую собираетесь форматировать.

    Теперь, чтобы внести изменения, воспользуйтесь одним из способов:

    1. Используйте горячие клавиши:
      • Ctrl+B – сделать полужирным
      • Ctrl+I – текст курсивом
      • Ctrl+U – подчеркнуть
      • Ctrl+5 – перечеркнуть
      • Ctrl+= – подстрочный формат (например, чтобы сделать индекс)
      • Ctrl+Shift++ – надстрочный (сделать степень в Эксель)
    2. Почти тот же набор команд можно найти на ленте в блоке Главная – Шрифт
      Настройка начертания с на ленте Эксель
    3. Откройте окно Формат ячеек и выберите нужные параметры в блоках Начертание и Видоизменение . В окне сразу будет показан образец отформатированного текста

    Начертание текста в окне «Формат ячеек»

    Выравнивание текста в ячейках

    Выравнивание текста – это параметр, указывающий каким образом текст будет располагаться в клетке. Указать параметры выравнивания можно такими способами:

    • На ленте в блоке: Главная – выравнивание . Кнопки-миниатюры красноречиво показывают, как будет выровнен текст, можно выбрать параметры горизонтального и вертикального выравнивания одновременно
      Выравнивание текста Эксель с помощью ленточных команд
    • В окне Формат ячеек на вкладке Выравнивание . В блоке Выравнивание выберите отдельно значения «по горизонтали» и «по вертикали».
      Выравнивание с помощью окна «Формат ячеек»

    В Excel доступны такие виды горизонтального выравнивания:

    • По значению – выравнивание устанавливается автоматически, в зависимости от типа данных. Текст выравнивается по левому краю, цифры – по правому, логические значения и ошибки – по центру
    • По левому краю (отступ) – текст примыкает к левой границе ячейки, слева добавляется отступ (если задан)
    • По центру – текст располагается в центре ячейки
    • По правому краю (отступ) – текст примыкает к правой границе ячейки, справа добавляется отступ (если задан)
    • С заполнением – повторяет содержимое ячейки, чтобы заполнить её полностью
    • По ширине – выравнивает текст и по левому краю и по правому. В этом формате большие тексты читаются лучше. Неполная строка — по значению
    • По центру выделения – подходит, когда нужно, чтобы текст отображался в центре какого-то диапазона. Например, чтобы название таблицы располагалось строго по центру, выделите все столбцы таблицы и примените это выравнивание
    • Распределенное (отступ) – аналогично «По ширине», неполная строка – по центру

    Примеры использования выравнивания по горизонтали

    Вертикальное выравнивание текста можно выбрать из таких вариантов:

    • По верхнему краю – текст примыкает к верхней границе ячейки
    • По центру – содержимое располагается в середине клетки
    • По нижнему краю – текст примыкает к нижней границе ячейки
    • По высоте – данные, записанные в несколько строк, распределяются по вертикали так, чтобы заполнить всю ячейку
    • Распределенное – аналогично «По высоте»

    Примеры выравнивания по вертикали в ячейках Excel

    Автоформатирование текста в Эксель

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

    1. Применить перенос по словам. Выделите ячейки для форматирования и выполните Главная – Выравнивание – Перенести текст . Другой способ сделать то же самое – в окне Формат ячеек на листе Выравнивание установите галочку Переносить по словам . Когда эта функция включена, программа сама расставляет переносы и увеличивает высоту строки, чтобы данные влезали в ячейки по ширине
    2. Используйте автоподбор по ширине. Если включить этот параметр, текст будет сужаться так, чтобы влезть в ячейку полностью. Для этого, установите галку в окне Формат ячеек — Выравнивание – Автоподбор ширины .

    Как объединить ячейки в Excel

    Иногда, при оформлении таблицы, нужно слить несколько ячеек Excel в одну. Лучше всего это сделать с помощью ленточной команды: Главная – Выравнивание – Объединить и поместить в центре . Применение этой команды приведёт к слиянию всех выделенных смежных ячеек, а в получившейся большой клетке останется содержимое первой ячейки диапазона. Остальная информация из массива исчезнет. Данные будут выровнены по центру.

    Параметры этой комбинированной команды можно открыть, щёлкнув на стрелке «вниз» справа от названия кнопки.

    Настройки объединения ячеек

    Вы сможете выполнить такие дополнительные команды:

    • Объединить по строкам – сливаются только столбцы в каждой строчке выделенного диапазона. Это существенно облегчает структурирование таблиц.
    • Объединить ячейки – сливает все выделенные ячейки в одну, но не выравнивает текст по центру
    • Отменить объединение ячеек – название само говорит за себя, объединённые ячейки снова становятся отдельными клетками листа.

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

    Изменение ориентации и направления текста

    Эти два инструмента очень похожи друг на друга, их часто путают. Вы будете регулярно применять их в работе, поэтому хорошо усвойте различия. Для примера я привожу рисунок. В столбце А я изменил ориентацию текста, а в столбце В — направление. Разница очевидна.

    Ориентация и направление текста в Excel

    Чтобы изменить эти два параметра воспользуйтесь ленточной командой Главная – Выравнивание – Ориентация . Чтобы выставить произвольный угол ориентации текста, укажите его в окне Формат ячеек — Выравнивание – Ориентация .

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

    В следующем посте я расскажу как правильно делать заливку цветом, разукрашивать текст и еще много интересного. До встречи!

    Источник: officelegko.com

    Подбор высоты строки/ширины столбца объединенной ячейки

    Для начала немного теории. Если в ячейках листа Excel записан некий длинный текст, то обычно устанавливают перенос на строки(вкладка Главная -группа ВыравниваниеПеренос текста), чтобы текст не растягивался на весь экран, а умещался в ячейке. При этом высота ячейки тоже должна измениться, чтобы отобразить все содержимое. Если речь идет всего об одной простой ячейке – проблем не возникает. Обычно, чтобы установить высоту строки на основании содержимого ячейки, достаточно навести курсор мыши в заголовке строк на границу строки(курсор приобретет вид направленных в разные стороны стрелок – ) и дважды быстро щелкнуть левой кнопкой мыши. Тоже самое можно сделать и для ширины столбцов.
    Но с объединенными ячейками такой фокус не прокатывает – ширина и высота для этих ячеек так не подбирается, сколько ни щелкай и приходится вручную подгонять каждую, чтобы текст ячейки отображался полностью:

    Стандартными средствами такой автоподбор не сделать, но вот при помощи VBA – без проблем. Ниже приведена функция, которая поможет подобрать высоту и ширину объединенных ячеек на основании их содержимого.

    Читайте также:  Как в эксель в ячейке сделать перенос

    ‘————————————————————————————— ‘ Procedure : RowHeightForContent ‘ Author : The_Prist(Щербаков Дмитрий) ‘ http://www.excel-vba.ru ‘ Purpose : Функция подбирает высоту строки/ширину столбца объединенных ячеек по содержимому ‘————————————————————————————— Function RowColHeightForContent(rc As Range, Optional bRowHeight As Boolean = True) ‘rc – ячейка, высоту строки или ширину столбца которой необходимо подобрать ‘bRowHeight – True – если необходимо подобрать высоту строки ‘ False – если необходимо подобрать ширину столбца Dim OldR_Height As Single, OldC_Widht As Single Dim MergedR_Height As Single, MergedC_Widht As Single Dim CurrCell As Range Dim ih As Integer Dim iw As Integer Dim NewR_Height As Single, NewC_Widht As Single Dim ActiveCellHeight As Single If rc.MergeCells Then With rc.MergeArea ‘если ячейка объединена ‘запоминаем кол-во столбцов iw = .Columns(.Columns.Count).Column – rc.Column + 1 ‘запоминаем кол-во строк. ih = .Rows(.Rows.Count).Row – rc.Row + 1 ‘Определяем высоту и ширину объединения ячеек MergedR_Height = 0 For Each CurrCell In .Rows MergedR_Height = CurrCell.RowHeight + MergedR_Height Next MergedC_Widht = 0 For Each CurrCell In .Columns MergedC_Widht = CurrCell.ColumnWidth + MergedC_Widht Next ‘запоминаем высоту и ширину первой ячейки из объединенных OldR_Height = .Cells(1, 1).RowHeight OldC_Widht = .Cells(1, 1).ColumnWidth ‘отменяем объединение ячеек .MergeCells = False ‘назначаем новую высоту и ширину для первой ячейки .Cells(1).RowHeight = MergedR_Height .Cells(1, 1).EntireColumn.ColumnWidth = MergedC_Widht ‘если необходимо изменить высоту строк If bRowHeight Then ‘.WrapText = True ‘раскомментировать, если необходимо принудительно выставлять перенос текста .EntireRow.AutoFit NewR_Height = .Cells(1).RowHeight ‘запоминаем высоту строки .MergeCells = True If OldR_Height ‘ .WrapText = True ‘раскомментировать, если необходимо принудительно выставлять перенос текста тогда код сам проставит переносы. Но тут следует учитывать, что в данном случае перенос будет выставлен для всех ячеек, что не всегда отвечает условиям

  • функция подбирает высоту и ширину исключительно для объединенных ячеек. Если ячейка не объединена – код оставит её без изменений
  • Теперь о том, как это работает и как применять. Для начала необходимо приведенный выше код функции вставить в стандартный модуль. Сама по себе функция работать не будет – её надо вызывать из другого кода, который определяет какие ячейки обрабатывать. В качестве такого кода я предлагаю следующий:

    Sub ChangeRowColHeight() Dim rc As Range Dim bRow As Boolean bRow = (MsgBox(“Изменять высоту строк?”, vbQuestion + vbYesNo, “www.excel-vba.ru”) = vbYes) ‘bRow = True: для изменения высоты строк ‘bRow = False: для изменения ширины столбцов Application.ScreenUpdating = False For Each rc In Selection RowColHeightForContent rc, bRow Next Application.ScreenUpdating = True End Sub

    Этот код также необходимо вставить в стандартный модуль. Теперь его можно будет вызвать из этой книги, нажатием клавиш Alt+F8 и выбрав ChangeRowColHeight , или создав на листе кнопку и назначив ей макрос. После этого достаточно будет выделить диапазон ячеек, среди которых есть объединенные и вызвать макрос ChangeRowColHeight. Для всех объединенных ячеек в выделенном диапазоне будет подобрана высота или ширина.
    Чтобы было нагляднее – я приложил пример, в котором помимо самих кодов есть вырезка из стандартной накладной. Именно в таких документах наиболее часто встречаются подобные казусы и необходимость подбирать высоту и ширину объединенных ячеек.
    Скачать пример:

    Tips_Macro_HeightWidthInMergeCell.xls (64,0 KiB, 1 845 скачиваний)

    Если подобную операцию приходится производить постоянно – советую коды записать в надстройку: Как создать свою надстройку?. Так же можно воспользоваться уже готовым решением в составе MulTEx – Высота/Ширина объединенной ячейки.

    Источник: www.excel-vba.ru

    Изменение ширины столбцов и высоты строк в Excel

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

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

    Изменение ширины столбца в Excel

    На примере ниже некоторая часть текста в столбце A не отображается, поскольку ширина ячейки слишком мала. Мы можем сделать весь текст видимым, просто изменив ширину столбца А.

    1. Наведите курсор на границу столбца справа от заголовка, он примет вид двойной стрелки.
    2. Нажмите и, не отпуская левую кнопку мыши, переместите курсор, чтобы увеличить или уменьшить ширину столбца.
    3. Отпустите левую кнопку мыши. Ширина изменится.

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

    Автоподбор ширины столбца и высоты строки в Excel

    Инструмент Автоподбор позволяет установить ширину столбца или высоту строки в соответствии с его содержимым.

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

    Вы можете воспользоваться инструментом Автоподбор для изменения ширины сразу нескольких столбцов. Для этого выделите столбцы, которые необходимо изменить, а затем на вкладке Главная из раскрывающегося меню команды Формат выберите пункт Автоподбор ширины столбца. Этот же способ может быть использован для автоподбора высоты строки.

    Изменение высоты строки в Excel

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

    Изменение высоты всех строк на листе Excel

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

    1. Выделите все ячейки на листе Excel, для этого щелкните по кнопке Выбрать все, которая находится на пересечении заголовков строк и столбцов.
    2. Наведите курсор на нижнюю границу заголовка любой строки, он примет вид двойной стрелки.
    3. Нажмите и, не отпуская левую кнопку мыши, переместите курсор, чтобы увеличить или уменьшить высоту строки.
    4. Отпустите левую кнопку мыши. Высота всех строк изменится и станет одинаковой.

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

    Источник: office-guru.ru