Як зробити так, щоб функція "Автоматична висота рядка" Excel фактично автоматично підходила до висоти рядка?

Я можу запам'ятати кожне покоління Excel (включаючи 2010 рік, який я зараз використовую). Особливості "Автоматичний розмір рядка" Excel іноді не вдається фактично розмістити рядки, коли комірка містить загорнутий текст. Якщо він працює належним чином, весь текст розкривається і немає додаткового місця під останнім рядком тексту. Коли це не вдається, це додає додаткового місця під текстом. Що ще гірше, те, що ви бачите, - це не завжди те, що ви отримуєте, тобто текст, який на екрані здався нормальним, відрізається під час друку. Ви також можете отримати різні розміри залежно від того, чи ви збільшуєте / зменшуєте чи фактично розмір.

Простий тестовий випадок:

Чому після тексту в комірці А1 є однорядковий розрив, а не в А2?

(Для відтворення: встановіть ширину стовпця А до 17,14 (125 пікселів), загортання тексту та вирівнювання комірки вгорі.)

(Я ще раз перевірив, чи застосував Автоматичну висоту рядка до обох рядків. Рівень масштабування становить 100%.)

Чи є якийсь відомий засіб для цього, не вдаючись до ручного регулювання висоти рядків (що не практично для кількох рядків)?

Я знайшов метод (трохи подовживши попереднє повідомлення):

• Виберіть весь аркуш.
• Змініть розмір стовпця трохи ширше (оскільки вибрано весь аркуш, усі стовпці будуть ширшими)
• Двічі клацніть роздільник рядків - висота рядка буде встановлена ​​автоматично
• Двічі клацніть роздільник стовпців - ширина стовпця буде автоматично налаштована

Вуаля!

WYSIWYG Excel - не найкращий. На вашому малюнку "кішка". просто ледве прокрадається в 5-й рядок. Якщо ви зменшите коефіцієнт збільшення до чогось меншого, ніж 100% (наприклад, 99%), тоді "cat". тепер завернуто до 6-го рядка. Я думаю, що Excel намагається автоматично підлаштовуватися таким чином, щоб забезпечити, що все майже завжди видно незалежно від рівня масштабування.

Це не єдина проблема, яку ви матимете з AutoFit. Окрім того, спосіб друку клітинки, обробленої словами, не завжди відповідає тому, що ви бачите на екрані. Візьміть свій приклад і змініть шрифт на Courier, залишаючи розмір у 11.

Як бачимо, осередку A1 видається 1,5 додаткових рядків. Тепер подивіться на попередній перегляд друку "cat". повністю прихований.

На мій досвід, Excel має цю проблему з певними шрифтами та розмірами шрифту більше, ніж інші. Кур'єр гірший, ніж Courier New , розмір 11, як правило, гірший ніж 10 або 12. (Чому вони вибрали розмір 11 як новий за замовчуванням, я не маю уявлення.)

Я лише написав для цього невеликий макрос. Я призначив їй клавішу швидкого доступу (Ctrl-Shift-J), і вона працює як шарм для мене.

Sub ArrangeTable()
'set proper column width and row height for the current region
    With Selection.CurrentRegion
        .Columns.ColumnWidth = 200
        .Columns.EntireColumn.AutoFit
        .Rows.EntireRow.AutoFit
    End With
End Sub

Щоб зробити це постійно доступним, ви можете легко зробити надбудову з автоматичним завантаженням:

• створити модуль у чистому чистому робочому зошиті та вставити код,
• призначте потрібну клавішу швидкого доступу,
• потім Save As, Add-inдо папки. %appdata%\Microsoft\Excel\XLSTART
  Таким чином, вона буде непомітно завантажена кожен раз при запуску Excel.

У деяких випадках проблема додаткового простору в деяких рядках після виклику "Автовимірювання висоти рядка" може полягати в тому, що прихований стовпець загорнув текст у ці рядки.

Про це є стаття kb, яка «підказує» (це неприпустимо рідко, в класичному стилі Microsoft), що якщо ви коли-небудь встановите висоту рядка, автоматичне автоматичне встановлення висоти буде назавжди відхилено для цього рядка цього робочого аркуша. Рядки, висоти яких ви не торкалися, автоматично налаштовують чудово.

Хоча ви можете скинути ширину стовпців за допомогою параметра "стандартна ширина" у 2003 році (розроблений безумним 2007: змінити на "ширина за замовчуванням"), але вони забули (знову) (і знову), щоб ввести це для рядків. Тому постійність здається неминучою. Це означає, що якщо у вас висота за замовчуванням 15, і ви створюєте аркуш і встановлюєте всі висоти до 12, ви просто втратили автоматичне автоматичне налаштування.

Іноді існує ядерний метод виправлення непорушних автопроблем.

Що я роблю, це скопіювати текст з кожної комірки та вставити дані в Блокнот, а потім видалити рядок. Потім я негайно копіюю та вставляю рядок, який є порожнім, але має таке ж форматування та хорошу поведінку, як і рядок, яку було видалено. (Ви повинні скопіювати і вставити весь ряд, використовуючи кнопки лівого рядка.)

Після цього потрібно повернутися назад і вставити текст із блокнота в кожну клітинку. (Використовуйте F2або іншим чином активуйте режим редагування кожної комірки перед тим, як вставляти текст.) Це біль, тому це в крайньому випадку, особливо для гіномерно широких робочих таблиць.

Іноді це єдине рішення, оскільки проблема полягає в самій програмі.

Я не ретельно перевіряв це, але це працює на мене. По суті, він автоматично регулює всі аркуші, потім повернеться назад і встановить ширину стовпця на початкову ширину, якщо вона не буде подовжена автоматичним регулюванням. У мене було лише 10 стовпців і ніколи більше 1000 рядків, тому коригуйте код за потребою.

Sub ResizeCells()
    Dim sheetCounter As Integer
    Dim rowCounter As Integer
    Dim colCounter As Integer
    Dim totalWidth As Double
    Dim oldColWidths(1 To 10) As Double

    For sheetCounter = 1 To ThisWorkbook.Sheets.Count
        ActiveWorkbook.Worksheets(sheetCounter).Select
        totalWidth = 0

        ' Extend the columns out to 200
        For colCounter = 1 To 10
            oldColWidths(colCounter) = Cells(1, colCounter).ColumnWidth
            totalWidth = totalWidth + oldColWidths(colCounter)
            Cells(1, colCounter).ColumnWidth = 200
        Next

        For rowCounter = 4 To 1000
            If Cells(rowCounter, 1).Value <> "" Or Cells(rowCounter, 2).Value <> "" Or Cells(rowCounter, 3).Value <> "" Then
                Rows(rowCounter & ":" & rowCounter).EntireRow.AutoFit
            End If
        Next

        ' do autofit
        For colCounter = 1 To 10
            Cells(1, colCounter).EntireColumn.AutoFit
        Next

        ' reset to original values if current width is less than the original width.
        For colCounter = 1 To 10
            If Cells(1, colCounter).ColumnWidth < oldColWidths(colCounter) + 0.25 Then
                Cells(1, colCounter).ColumnWidth = oldColWidths(colCounter)
            End If
        Next
    Next
End Sub

Перефразовуючи Данка :

Я вирішив подібне питання:

1. Вибір всієї таблиці.

2. Двічі клацніть рядок на полі між двома рядками.

Зокрема, для вирішення вашої проблеми цього додаткового рядка, я вважаю, що там є символ. Це може бути не видимий персонаж, але там напевно щось є.

Я не знайшов часу, щоб прочитати інші коментарі. Чому рядок внизу першого блоку, а не у другому блоці?

Це тому, що текст закінчується занадто близько до правого краю клітинки. Якщо ви відрегулюєте стовпець трохи ширшим та двічі клацніть між рядками, він буде відповідно змінити розмір.

Я теж пережив цю крихітну, але надзвичайно відволікаючу помилку протягом багатьох років. У мене немає ніякої роботи, окрім того, як обмацувати ширину рядків для комірки з більшою кількістю тексту, і врешті-решт програма відмовиться та відобразить текст належним чином.

Є просте рішення:

1) Виберіть усі рядки, які потрібно автоматично відформатувати (якщо це великий блок, натисніть на перший, а потім натисніть Shift + End і Shift + Down)

2) Клацніть правою кнопкою миші на виділенні, Форматування комірок, вкладка Вирівнювання, зніміть прапорці Перегорнути текст.

Сподіваюся, це допомагає;)

У мене є Excel 2010. Я виявив, що ця проблема трапилася зі мною, коли налаштування масштабування не було на 100%. Поки я перебуваю на 100%, я не отримую відрізаний текст за допомогою функції автоматичного підключення для стовпців і рядків

Моя гіпотеза полягає в тому, що Excel зав'язується, коли йому потрібно простягати занадто багато рядків. У мене був подібний досвід до вищевказаного. Це виглядає як є додатковий NL / CR / LF в кінці , але я знаю , що це не так . Якщо я будую комірку за деякими символами за один раз, вона автоматично формує ОК, поки не буде досягнуто певного розміру, то він ставить у додатковий рядок. (Подібна поведінка у зворотному випадку трапляється, якщо ви починаєте, видаляючи деякі символи.) Це відбувається в різний час із різними осередками.

Бампер!

Отже, якщо ви можете збільшити ширину комірок, ви, ймовірно, можете уникнути проблеми. Якщо ви не можете (як у моєму випадку), ви зупинилися на ручному форматуванні. Як я вже сказав: "Баммер!"

Насправді там є зайвий персонаж. Це прихований символ НЧ, який знаходиться в кінці кожного поля. Коли текст має правильний розмір, додатковий рядок може містити символ LF. Зміна розміру ширини стовпця, як запропонували інші люди, вирішить проблему цієї комірки, але якщо у вашій електронній таблиці є велика кількість різних розмірів у цьому ж стовпці, можливо, виправлення цієї комірки спричинить проблему в іншій комірці. . Я навчився жити з цим більшу частину часу.

Що працювало для мене (Excel 2010), було видалити сто або більше невикористаних стовпців праворуч від моїх даних. Я можу лише здогадуватися, що щось там спричинило неправильну поведінку висоти рядка.

виберіть усі клітинки та натисніть на рядок, який розділяє рядки двічі ... це автоматично зробить.