怎么在excel单元格1-5行中在原来内容前面加上固定一个字？

环境：

WPS 2024

问题描述：

怎么在excel单元格1-5行中在原来内容前面加上固定一个字？

解决方案：

1.在Excel中，如果您想在单元格的内容前面添加一个固定的字，可以通过以下几种方法实现：

方法1：使用公式

在一个空白列的第一个单元格（例如B1）输入以下公式：

="固定字" & A1

其中，固定字是您想要添加的内容，A1是您要修改的单元格。

按下 Enter，然后将鼠标悬停在B1单元格的右下角，直到出现一个小十字（填充句柄）。

拖动填充句柄向下到B5，公式将自动应用到B2到B5。

如果您希望将这些新值替换到原来的单元格中，可以选择B1到B5，复制它们（Ctrl+C），然后右键单击A1，选择"粘贴特殊" -> "值"，将新值粘贴到原来的位置。

2.使用VBA宏

需要频繁进行此操作，可以使用VBA宏来自动化：

按 Alt + F11 打开VBA编辑器。
点击 插入 -> 模块。
在模块中粘贴以下代码：

Sub AddPrefix()
    Dim i As Integer
    For i = 1 To 5
        Cells(i, 1).Value = "固定字" & Cells(i, 1).Value
    Next i
End Sub

关闭VBA编辑器，返回Excel。

按 Alt + F8，选择 AddPrefix，然后点击"运行"按钮。

内容的后面。

VBA代码示例

Sub AddSuffix()
    Dim i As Integer
    ' 循环遍历第1到第5行
    For i = 1 To 5
        ' 在每个单元格的内容后添加"固定字"
        Cells(i, 1).Value = Cells(i, 1).Value & "固定字"
    Next i
End Sub

代码解释

Sub AddSuffix()：定义了一个新的子程序，名为 AddSuffix。
Dim i As Integer：声明一个整数变量 i，用于循环计数。
For i = 1 To 5：开始一个循环，从1到5，表示将对第1到第5行的单元格进行操作。
Cells(i, 1).Value：获取第 i 行第1列（即A列）的单元格内容。
Cells(i, 1).Value & "固定字"：将原单元格内容与"固定字"连接。
Next i：结束循环。

如何使用此代码

按 Alt + F11 打开VBA编辑器。
点击 插入 -> 模块，将在项目中插入一个新的模块。
在模块窗口中粘贴上述代码。
关闭VBA编辑器，返回Excel。
按 Alt + F8，选择 AddSuffix，然后点击"运行"按钮。