如何在单元格开头的现有数字列中附加字母（文本）

Question

您能提供一些指导吗 - 我有一列数字，需要在单元格中每个数字的开头添加一个“D”。我不希望“D”填充到空单元格中。谢谢。Terri

Answer 1

假设我们在列中有常量数据德喜欢：

然后我们运行这个 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,"")