Как сделать ячейку в 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);
• подведите указатель мыши к разделу любых двух заполненных строк (на сером заголовке столбцов) и дважды кликните.

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

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

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

Источник: https://excel2.ru/articles/avtopodbor-v-ms-excel-shiriny-stolbca-i-vysoty-stroki-po-soderzhimomu-yacheek

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

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

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

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

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

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

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



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

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

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

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

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



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



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

Способ 3: ручной ввод размера через контекстное меню

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

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



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

Аналогичным способом производится изменение высоты строк.

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



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

Указанные выше манипуляции позволяют увеличить ширину и высоту ячеек в единицах измерения.

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

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

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

Способ 5: увеличение размера всех ячеек листа или книги

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

1. Для того, чтобы совершить данную операцию, следует, прежде всего, выделить нужные элементы. Для того, чтобы выделить все элементы листа, можно просто нажать сочетание клавиш на клавиатуре Ctrl+A. Существует и второй вариант выделения. Он предполагает нажатие на кнопку в виде прямоугольника, которая расположена между вертикальной и горизонтальной шкалой координат Excel.
2. После того, как выделили любым из этих способов лист, жмем на уже знакомую нам кнопку «Формат» на ленте и производим дальнейшие действия точно так же, как описано в предыдущем способе с переходом по пунктам «Ширина столбца…» и «Высота строки…».

Аналогичные действия производим для увеличения размера ячеек всей книги. Только для выделения всех листов используем другой прием.

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

Урок: Как сделать ячейки одинакового размера в Excel

Способ 6: автоподбор ширины

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

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

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

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

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

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

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

Мы рады, что смогли помочь Вам в решении проблемы.

Опишите, что у вас не получилось.
Наши специалисты постараются ответить максимально быстро.

Помогла ли вам эта статья?

ДА НЕТ

Источник: https://lumpics.ru/how-to-expand-a-cell-in-excel/

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

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

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

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

Примечание:

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

2) если у вас «глючит» Excel — можно пользоваться также его аналогами: https://ocomp.info/chem-zamenit-word-i-excel.html

*

Вариант 1

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

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

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

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

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

Вариант 2

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

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

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

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

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

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

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

Вариант 3

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

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

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

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

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

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

Вариант 4

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

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

PS

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

*

На сегодня пока всё… 

Удачной работы!

????

RSS (как читать Rss)

Полезный софт:

• ВидеоМОНТАЖ

Отличное ПО для начала создания своих собственных видеороликов (все действия идут по шагам!).Видео сделает даже новичок!

• Ускоритель компьютера

Программа для очистки Windows от мусора (ускоряет систему, удаляет мусор, оптимизирует реестр).

Источник: https://ocomp.info/dlinnyiy-tekst-v-excel-yacheyke.html

Изменение ширины столбцов и высоты строк в Excel — Microsoft 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 на клавиатуре.

Оцените качество статьи. Нам важно ваше мнение:

Источник: https://office-guru.ru/excel/izmenenie-shiriny-stolbcov-i-vysoty-strok-v-excel-16.html

Размер ячейки по содержимому Excel — Офис Ассист

Ширины столбца можно быстро задать в соответствии с набранным текстом. 1 способ:

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

2 способ:

• В окне открытого листа наберите текст в ячейке нужного столбца.
• Выделите этот столбец и перейдите к вкладке «Главная».
• В группе «Ячейки» раскройте меню кнопки «Формат».
• Выберите в списке пункт «Автоподбор ширины столбца» (рис. 2.76).

Как задать автоподбор высоты строки?

1 способ:

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

2 способ:

• В окне открытого листа выделите нужную строку (или несколько строк) и перейдите к вкладке «Главная».
• В группе «Ячейки» раскройте меню кнопки «Формат».
• Выберите в списке пункт «Автоподбор высоты строк» (рис. 2.77).

1 способ:

• В окне открытого листа выделите нужные столбцы.
• Щелкните правой кнопкой мыши на выделенном диапазоне.
• В контекстном меню выберите пункт «Ширины столбца».
• В окошке «Ширина столбца» (рис. 2.78) задайте ширину столбца в символах (при размере шрифта 10 пт).
• Закройте окошко кнопкой «ОК».

• В окне открытого листа выделите нужные столбцы и перейдите к вкладке «Главная».
• В группе «Ячейки» раскройте меню кнопки «Формат».
• В меню «Формат» выберите пункт «Ширина столбца» (рис. 2.79).
• Далее как в первом способе данной инструкции.

Как задать точную высоту строк?

1 способ:

• В окне открытого листа выделите нужные строки.
• Щелкните правой кнопкой мыши на выделенном диапазоне.
• В контекстном меню выберите пункт «Высота строки»
• В окошке «Высота строки» (рис. 2.80) задайте высоту строки в пунктах (3 пт ≈ 1 мм).
• Закройте окошко кнопкой «ОК».

Ширина столбцов изначальна равно 8,43 символа (при размере шрифта 10 пт). Эту стандартную ширину можно изменить на любое другое значение.

Источник: http://officeassist.ru/excel/razmer-yachejki-po-soderzhimomu-excel/

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

Хитрости » 10 Август 2016       Дмитрий       15215 просмотров

Для начала немного теории.

Если в ячейках листа 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 < (NewR_Height / ih) Then .RowHeight = NewR_Height / ih Else .RowHeight = OldR_Height End If 'возвращаем ширину столбца первой ячейки .Cells(1, 1).EntireColumn.ColumnWidth = OldC_Widht Else 'если необходимо изменить ширину столбца .EntireColumn.AutoFit NewC_Widht = .Cells(1).EntireColumn.ColumnWidth 'запоминаем ширину столбца .MergeCells = True If OldC_Widht < (NewC_Widht / iw) Then .ColumnWidth = NewC_Widht / iw Else .ColumnWidth = OldC_Widht End If 'возвращаем высоту строки первой ячейки .Cells(1, 1).RowHeight = OldR_Height End If End With End If End Function

'————————————————————————————— ' 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 < (NewR_Height / ih) Then .RowHeight = NewR_Height / ih Else .RowHeight = OldR_Height End If 'возвращаем ширину столбца первой ячейки .Cells(1, 1).EntireColumn.ColumnWidth = OldC_Widht Else 'если необходимо изменить ширину столбца .EntireColumn.AutoFit NewC_Widht = .Cells(1).EntireColumn.ColumnWidth 'запоминаем ширину столбца .MergeCells = True If OldC_Widht < (NewC_Widht / iw) Then .ColumnWidth = NewC_Widht / iw Else .ColumnWidth = OldC_Widht End If 'возвращаем высоту строки первой ячейки .Cells(1, 1).RowHeight = OldR_Height End If End With End If End Function

Пара замечаний:

• т.к. нельзя выставить и автоширину и автовысоту — то функция подбирает либо высоту, либо ширину, что логично
• чтобы подбор по высоте ячеек сработал, для ячейки должен быть выставлен перенос строк(вкладка Главная -группа Выравнивание —Перенос текста). Если ячеек много и выставлять вручную лень — можно просто убрать апостроф перед точкой в строке:'.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

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 649 скачиваний)

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

Статья помогла? Поделись ссылкой с друзьями!

Источник: https://www.excel-vba.ru/chto-umeet-excel/podbor-vysoty-strokishiriny-stolbca-obedinennoj-yachejki/

VBA Excel. Размер ячейки (высота строки, ширина столбца)

Изменение размера ячейки в VBA Excel. Высота строки, ширина столбца, автоподбор ширины ячейки. Свойства RowHeight и ColumnWidth объекта Range.

1. Размер ячейки
2. Высота строки
3. Ширина столбца
4. Автоподбор ширины

Размер ячейки

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

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

Высота строки и ширина столбца в Excel

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

На сайте поддержки офисных приложений Microsoft так написано об этих величинах:

• высота строки может принимать значение от 0 до 409 пунктов, причем 1 пункт приблизительно равен 1/72 дюйма или 0,035 см;
• ширина столбца может принимать значение от 0 до 255, причем это значение соответствует количеству символов, которые могут быть отображены в ячейке.

Высота строки

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

Примеры изменения высоты строк:

Пример 1

Изменение высоты отдельной ячейки:

ActiveCell.RowHeight = 10

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

Пример 2

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

Rows(3).RowHeight = 30

в результате, третья строка рабочего листа приобретает высоту, равную 30 пунктам.

Пример 3

Изменение высоты ячеек заданного диапазона:

Range(«A1:D6»).RowHeight = 20

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

Пример 4

Изменение высоты ячеек целого столбца:

Columns(5).RowHeight = 15

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

Ширина столбца

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

Примеры изменения ширины столбцов:

Пример 1

Изменение ширины отдельной ячейки:

ActiveCell.ColumnWidth = 15

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

Пример 2

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

Columns(3).ColumnWidth = 50

в результате, третий столбец рабочего листа (столбец «C») приобретает ширину, равную 50 символам.

Пример 3

Изменение ширины ячеек заданного диапазона:

Range(«A1:D6»).ColumnWidth = 25

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

Пример 4

Изменение ширины ячеек целой строки:

Rows(4).ColumnWidth = 35

в результате, всем столбцам рабочего листа будет назначена ширина, равная 35 символам.

Автоподбор ширины

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

'запишем для примера в любую ячейку рабочего
'листа какой-нибудь текст, например, такой:
Cells(5, 5) = «Автоподбор ширины ячейки»
'теперь подгоним ширину ячейки, а точнее
'столбца, в котором эта ячейка находится:
Cells(5, 5).EntireColumn.AutoFit

Имейте в виду, что ширина столбца будет подогнана по расположенной в этом столбце ячейке с самым длинным содержимым. Например, если длина содержимого ячейки Cells(7, 5) будет превышать длину содержимого ячейки Cells(5, 5), то автоподбор ширины пятого столбца произойдет по содержимому ячейки Cells(7, 5), несмотря на то, что в строке кода указана другая ячейка.

Как осуществить автоподбор ширины объединенной ячейки, в которой метод AutoFit не работает, смотрите в следующей статье.

Источник: https://vremya-ne-zhdet.ru/vba-excel/razmer-yacheyki-vysota-stroki-shirina-stolbtsa-avtopodbor/

Как изменить размер ячеек в Excel

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

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

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

Ширину

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

Высоту

С изменением высоты все аналогично: выделяйте блок и перемещайте границу, которая находится под номером выбранного ряда (в примере, линия под цифрой 8).

Ввод точных значений

Чтобы задать более точные значения, можно использовать следующий способ. Выбираем ячейку, затем вверху кликните по «Главная». Найдите кнопку «Формат», нажмите ее и в списке выберите или «Высота строки» или «Ширина столбца».

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

• Если Вам нужно установить одинаковый размер ширины для нескольких ячеек, тогда предварительно выделите столбцы, в которых они находятся, нажмите правой кнопкой мышки по выделению и в списке выбирайте подходящий пункт.
• Про различные способы выделение ячеек в Экселе, прочтите отдельную статью.
• Дальше указываем число в пунктах.
• Можно указать один размер и для ячеек, которые находятся не в смежных столбцах, например, в В и F.
• Тоже самое применимо и к рядам, выделяйте те, которые находятся рядом или в разных местах, открывайте маленькое окно и указывайте в нем нужное значение.
• Если Вам нужно сделать все ячейки в Excel одинакового размера, тогда выделите их, через контекстное меню или панель инструментов откройте окно «Ширина столбца» и укажите в нем значение.
• Чтобы строки стали одного размера по высоте, тоже нужно их выделить, открыть знакомое нам окно и вписать туда подходящее число.

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

Чтобы поместился текст

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

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

Подогнать размер блока по тексту можно и по-другому. Для этого выделите нужные и в выпавшем списке Формат выберите автоподбор ширины и высоты.

В итоге, все слова в ячейках будет видно.

Указание единиц измерения

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

В следующем окне слева перейдите на «Дополнительно», прокрутите окно в низ и в поле «Единицы на линейке» выберите подходящую величину. Жмите «ОК».

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

Данный способ не совсем точный. Например, у меня так и не получилось выбрать ширину ровно 3 см. Поэтому вот небольшая шпаргалка:
1 пункт – 1.33 пиксель – 0.35 мм
1 пиксель – 0.75 пунктов – 0.24мм
1 мм – 2.85 пунктов – 3.8 пикселя
Что касается сантиметров:
0,98 см – 37 пикселя
1,01 см – 38 пикселя

1. 0,50 см – 19 пикселей
2. Можете перевести нужное значение в сантиметрах или миллиметрах в пункты или пиксели и установить это значение для ячейки самым первым описанным способом.

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

(1

Источник: http://comp-profi.com/kak-izmenit-razmer-yacheek-v-excel/