Excel, как заполнить все выбранные пустые ячейки текстом

Ответ 1

ОК, вы можете попробовать

Cntrl + H (Найти и заменить), оставьте Найти что пустое и измените Заменить с на NULL.

Это должно заменить все пустые ячейки в USED-диапазоне с помощью NULL

Ответ 2

Чтобы поместить тот же текст в определенное количество ячеек, выполните следующие действия:

• Выделите ячейки, в которые вы хотите поместить текст, в
• Введите в ячейку, в которой вы находитесь, в данных, которые вы хотите повторить.
• Удерживайте Crtl и нажмите "return"

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

Ответ 3

Вот сложный способ сделать это - выберите ячейки, которые вы хотите заменить, и в Excel 2010 выберите F5, чтобы открыть окно "goto". Нажмите "специальную" кнопку. Выберите "пробелы" - это должно выбрать все ячейки, которые пусты. Введите NULL или что угодно в поле формулы и нажмите ctrl + enter, чтобы применить ко всем выбранным ячейкам. Легко!

Ответ 4

Если все ячейки находятся под одним столбцом, вы можете просто фильтровать столбец, а затем выбрать "(blank)", а затем вставить любое значение в ячейки. Но будьте осторожны, нажмите "alt + 4", чтобы убедиться, что вы вставляете значение только в видимые ячейки.

Ответ 5

Я не верю, что поиск и замена сделают это за вас (не работает для меня в Excel 2010 Home). Вы уверены, что хотите поставить "null" в КАЖДОЙ ячейке на листе? Это миллионы ячеек, и в этом случае поиск и замена не смогут обрабатывать его по памяти (исправьте меня, если я ошибаюсь).

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

Sub FillWithNull()

Dim cell As range
Dim myRange As range

Set myRange = Application.InputBox("Select the range", Type:=8)
Application.ScreenUpdating = False

For Each cell In myRange
    If Len(cell) = 0 Then
        cell.Value = "Null"
    End If
Next

Application.ScreenUpdating = True

End Sub

Ответ 6

Если вы хотите сделать это в VBA, это более короткий метод:

Sub FillBlanksWithNull()

'This macro will fill all "blank" cells with the text "Null"

'When no range is selected, it starts at A1 until the last used row/column

'When a range is selected prior, only the blank cell in the range will be used.

On Error GoTo ErrHandler:

Selection.SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "Null"

Exit Sub

ErrHandler:

MsgBox "No blank cells found", vbDefaultButton1, Error

Resume Next

End Sub

Привет,

Роберт Ильбринк