Excel - предотвращение переполнения текста ячейки в следующую (пустую) ячейку

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

Я знаю, что могу избежать этого, включив "перенос слов" и регулируя высоту строки. Но это не то, что я хочу.

Я хочу изменить поведение DEFAULT в Excel, чтобы оно отображало значение каждой ячейки только в видимой области этой ячейки. Без переполнения, без переноса слов.

Это возможно? (Я использую Excel 2010, кстати.)

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

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

Да, вы можете изменить это поведение, но вы, вероятно, не захотите побочных эффектов, которые это вызывает.

Ключом к ограничению содержимого ячейки до границ ячейки независимо от того, содержит ли соседняя ячейка данные, является выравнивание текста Fill. Выберите ячейки, которые вы не хотите переполнять, и щелкните их правой кнопкой мыши> Форматировать ячейки ... > вкладка «Выравнивание» > « Горизонтальное выравнивание» > « Заливка».

Проблема этого метода состоит в том , что это будет на самом деле заполнить клетки, повторяя их содержание , когда оно достаточно коротким , чтобы поместиться в клетке несколько раз. Смотрите скриншот ниже, что это значит. (Обратите внимание , что B7будет заполнен с «коротким текстом».)

Похоже, вы застряли с обходными путями в посте Бенедикта

Обратите внимание, что вы также можете заполнить соседние ячейки галочками ( '), используя первый, очень умный метод Бенедикта . Таким образом, вам не нужно ничего скрывать, предотвращать переполнение ячеек, и если вы копируете ячейки как текст (скажем, в блокнот), вы по-прежнему получаете пустой текст, а не пробелы или галочки.

Вот как я это делаю.

1. Вариант 1. Заполните все пустые ячейки «N / A», а затем используйте условное форматирование, чтобы сделать текст невидимым.
2. Или вариант 2: заполните все пустые ячейки 0 и используйте настройку Excel, чтобы скрыть нулевые значения.

Заполнение всех пустых ячеек: (проверено на Mac)

• Изменить → Перейти к ... → Специальные ... (В Windows: Главная → Редактирование → Найти и выбрать → Перейти к ...)
• Выберите «Пробелы» и нажмите «ОК».
• Все пустые ячейки выделены. Не нажимай ничего.
• Введите «N / A» или 0, а затем нажмите Ctrl+ Enter^† . Это вставит значение во все выбранные ячейки.

Условное форматирование, чтобы скрыть "N / A"

• Формат → Условное форматирование.
• Создать новое правило.
• Стиль: Классический, и используйте формулу, чтобы определить, какие ячейки форматировать.
• Формула: =A1="N/A"
• Формат с: Пользовательский формат: Цвет шрифта белый, без заливки.

Скрыть нули

• Excel → Настройки → Вид.
• Снимите флажок «Показать нулевые значения».

_______________
^†   Это Ctrl+ Enter, а не Ctrl+ Shift+Enter .

Попробуйте ввести формулу = "" (это две двойные кавычки) в соседней ячейке, где вы не хотите видеть переполнение. Это оценивается как «ноль», который ничего не отображает и не повлияет на математику.

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

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

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

1. Барьерная колонна

2. Вставьте столбец «барьер» слева от столбцов, которые вы хотите защитить.

3. Сверните столбцы барьера, установив для их ширины столбца небольшое значение

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

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

4. Вуаля!

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

(Примечание. Я нашел это и опубликовал как комментарий в выбранном ответе, но также опубликовал его как ответ, чтобы его было легче найти для других.)

При том же мнении, что Google Sheets может быть не для всех , этот макрос может быть не для всех, но для кого-то .

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

Флаги определяют, если:

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

• усеченный текст жестко запрограммирован или связан с помощью формулы листа =LEFT()

• усеченный текст связан с полной строкой в ​​новом листе.

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

Option Explicit

Sub LinkTruncatedCells()
    Dim rng As Range: Set rng = Selection
    Dim preserveValues As Boolean: preserveValues = True
    Dim linkAsFormula As Boolean: linkAsFormula = True
    Dim linkAsHyperlink As Boolean: linkAsHyperlink = True
    Dim w As Single
    Dim c As Range
    Dim r As Range
    Dim t As Long
    Dim l As Long
    Dim s As String
    Dim ws As Worksheet
    Dim ns As Worksheet
    Application.ScreenUpdating = False
    Set ws = rng.Parent
    For Each c In rng.Columns
        w = c.ColumnWidth
        t = 0
        l = 0
        For Each r In c.Rows
            If Len(r) > l Then
                s = r
                If CBool(l) Then r = Left(s, l)
                Do
                    r.Columns.AutoFit
                    If r.ColumnWidth > w And Len(s) > t Then
                        t = t + 1
                        r = Left(s, Len(s) - t)
                        l = Len(r)
                    End If
                Loop Until t = Len(s) Or r.ColumnWidth <= w
                r.ColumnWidth = w
                If r <> s And preserveValues Then
                    If ns Is Nothing Then
                        Set ns = ws.Parent.Worksheets.Add(after:=ws)
                    End If
                    ns.Range(r.Address) = s
                    If linkAsFormula Then r.Formula = "=LEFT(" & ns.Name & "!" & r.Address & "," & l & ")"
                    If linkAsHyperlink Then ws.Hyperlinks.Add Anchor:=r, Address:="", SubAddress:= _
                            ns.Range(r.Address).Address(external:=True)
                End If
            End If
        Next r
    Next c
    ws.Activate
    Application.ScreenUpdating = True
End Sub

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