Как добавить букву (текст) в существующий столбец чисел в начале ячейки

Question

Можете ли вы предложить руководство здесь - у меня есть столбец чисел, и мне нужно добавить "D" в начале каждого числа в ячейке. Я не хочу, чтобы "D" заполнял пустые ячейки. Спасибо.Terri

Answer 1

Скажем, у нас есть постоянные данные в столбце D, например:

и мы запускаем этот макрос VBA:

Sub dural()
    Dim rng As Range, r As Range
    Set rng = Columns("D").Cells.SpecialCells(2)

    For Each r In rng
        r.Value = "D" & r.Value
    Next r
End Sub

результат:

Использование SpecialCells позволяет избежать добавления буквы "D" к пустым ячейкам.

Answer 2

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

Формула:=IF(D1<>"","D"&D1,"")