跳到主要内容

如何在Excel中所有单元格的开头或结尾添加文本?

作者:凯莉 最后修改时间:2024-05-08

有时,您可能会发现自己需要在所选内容的每个单元格中添加或附加相同的特定文本。 为每个单元手动执行此操作可能非常乏味且耗时。 幸运的是,有几种更简单的方法可以实现此目的,使您可以更有效地将相同的文本添加到所选内容中所有单元格的开头或结尾。


视频:在 Excel 中添加文本


使用快速填充将文本添加到所有单元格的开头/结尾

Excel 中的快速填充是一种智能工具,可在检测到模式时自动填充数据。当您有所需输出的示例时,此功能对于向单元格添加文本特别有用。

假设你需要 在 A 列的姓名前添加“Dr.”。以下是如何使用快速填充来实现此目的:

  1. 确保您的数据位于一列中,并且下一列为空。

  2. 输入第一个示例 “博士。” 添加到下一列的第一个单元格中,然后点击 输入.

  3. 媒体 按Ctrl + E 自动填充列中的其余单元格 “博士。” 为名称添加前缀。

    提示: 您也可以点击 时间 功能区上的选项卡,然后选择 Flash填充 如果您更喜欢使用功能区界面进行 Excel 操作,也可以获得相同的结果。

请注意:在名称后添加特定文本,例如附加 “,人力资源” 要指示人力资源部门,您可以使用相同的方法:


使用公式将文本添加到所有单元格的开头/结尾

要轻松地在单元格的开头或结尾插入特定文本或字符,您可以使用 Excel 公式将指定的字符串与单元格引用连接起来。假设你需要 将“Class A:”添加到 A 列中的名称前面。以下是如何应用公式来实现此目的:

  1. 选择要输出名字前缀为“的单元格”A类: ".

  2. 根据您的喜好输入任何这些公式并点击 输入 查看第一个结果(这里我以第一个公式为例):
    ="Class A: "&A2
    =CONCATENATE("Class A: ", A2)
    =CONCAT("Class A: ", A2)
    提示: 在这些公式中,“A类: " 是添加到名称中的前缀,并且 A2 是包含您要修改的名称的第一个单元格。随意替换”A类: ”并调整 A2 以满足您的特定需求。

  3. 将填充柄向下拖动到要应用此公式的单元格。

笔记:

  • 为简单起见,请将要添加的文本放置到特定单元格中(例如 E2),然后合并两个单元格。 提示: 前置文本的单元格地址用 $ 符号锁定,以防止在复制公式时发生更改。

  • 将文本附加到单元格现有内容的末尾,只需反转公式结构即可。例如,要在单元格 A2 中的内容末尾添加“- Class A”,请使用以下任一公式:
    =A2&" - Class A"
    =CONCATENATE(A2, " - Class A")
    =CONCAT(A2, " - Class A")


使用 AI 将文本添加到所有单元格的开头/结尾

AI助手功能 Kutools for Excel 是智能数据处理的重大飞跃。它利用人工智能来分析您的请求并通过简单的命令执行复杂的任务。

预先添加文本,例如 “博士。” 到您选择的单元格,只需选择单元格,然后单击 库工具 > 人工智能助手,并告诉 Kutools AI Aide: 在每个选定的单元格之前添加“Dr.”。它将立即理解并呈现 执行 按钮。单击它,更改将立即应用。

笔记:

  • 如果结果不是您所期望的并且您希望撤消更改,请单击 不满意 按钮来恢复您的操作。
  • 将文本(例如“AA”)附加到所有选定单元格的末尾,将您的请求调整为 添加“AA” after 每个选定的单元格.
  • 想要访问 人工智能助手 公用事业? 下载 Kutools for Excel 现在! 除此之外,Kutools 还拥有 300 多个其他功能,并提供 30 天免费试用。 不要等待,今天就尝试一下吧!

使用 VBA 将文本添加到所有单元格的开头/结尾

在本节中,我们将探索一种简单的 VBA 方法,将指定的文本直接添加到一个或多个选定范围内的所有单元格的开头或结尾。

  1. 选择要将指定文本添加到所有单元格的开头或结尾的范围。
  2. 按住 Alt + F11键 在Excel中打开键 Microsoft Visual Basic应用程序 窗口。
  3. 点击 插页 > 模块,然后将以下VBA代码粘贴到 模块 窗口。
    • VBA:添加指定文本 到开始 细胞
      Sub PrependToSelectedCells()
          Dim c As Range
          For Each c In Selection
              If c.Value <> "" Then c.Value = "EXCL-" & c.Value 
          Next
      End Sub

      请注意: 此代码为所有选定的单元格添加前缀 “排除-”。确保在将代码中的示例文本应用到工作表之前将其替换为您需要的实际文本。

    • VBA:添加指定文本 到最后 细胞
      Sub AppendToSelectedCells()
          Dim c As Range
          For Each c In Selection
              If c.Value <> "" Then c.Value = c.Value & "-XS"
          Next
      End Sub

      请注意: 该宏附加 “-XS” 每个选定单元格的内容。确保更换 “-XS” 在工作表中运行宏之前,使用您希望附加到单元格内容的特定后缀。

  4. F5 键运行宏。

结果

  • 如果运行第一个 VBA,则该值 “排除-” 将被添加到所有选定单元格的内容之前。

  • 如果运行第二个 VBA,则该值 “-XS” 将附加到所有选定单元格的内容中。

提示: 如果你愿意的话 将修改后的值放入右侧相邻列中 不要直接将文本添加到原始值,而是使用以下代码:
  • 将文本添加到单元格内容之前并放置在下一列中:

    Sub PrependToRightOfSelectedCells()
        Dim c As Range
        For Each c In Selection
            If c.Value <> "" Then c.Offset(0, 1).Value = "EXCL-" & c.Value
        Next c
    End Sub
  • 将文本附加到单元格内容并放置在下一列中:

    Sub AppendToRightOfSelectedCells()
        Dim c As Range
        For Each c In Selection
            If c.Value <> "" Then c.Offset(0, 1).Value = c.Value & "-XS"
        Next c
    End Sub

使用 Kutools for Excel 将文本添加到所有单元格的开头/结尾

Kutools for Excel's Add Text 该工具旨在有效地处理在一个或多个选择的每个单元格的开头或结尾添加指定文本。此外,该工具还擅长执行更详细的任务,例如:

  • 在单元格内容中的特定段之前或之后添加文本。
  • 在指定位置插入文本。
  • 通过同时添加前缀和后缀,将文本环绕现有内容。
  • 在大写和/或小写字母之前专门附加文本。
  • 以及更专业的文本操作需求......

一旦你有 Kutools for Excel 安装后,选择一个或多个要添加指定文本的范围,然后单击 库工具 > Text > Add Text。 在 Add Text 对话框,请执行以下操作:

  1. 输入您要添加的文本。
  2. 选择所需的文本放置位置选项。 您可以在预览窗格中预览结果。
  3. 击中 OK.

提示:
  • 在提供的屏幕截图中, “2024” 已在文本框中输入 最后一个字符之后 已选择选项。在将更改应用到所选范围之前,您可以预览文本在每个单元格中的显示方式。
  • 如果您检查 Skip non-text cells 选项,该工具不会将指定的文本添加到包含非文本内容的单元格。

请注意: 想要访问 添加文本 公用事业? 下载 Kutools for Excel 现在! 除此之外,Kutools 还拥有 300 多个其他功能,并提供 30 天免费试用。 不要等待,今天就尝试一下吧!


使用自定义格式以可视方式将文本添加到所有单元格的开头/结尾

Excel 中的自定义格式是一项强大的功能,可让您 直观地修改单元格显示 而不实际改变细胞的原始内容。它对于添加对于解释至关重要但不应该干扰计算的单位或标识符特别有用。

假设您有一列代表您想要的权重的数字 显示每个数字后附加单位“kg” 出于计算目的而无需更改实际数字。请按照以下步骤操作:

  1. 选择包含权重的单元格。您可以选择电子表格中的范围、整列或特定单元格。

  2. 按住 Ctrl + 1 键打开 单元格格式 对话。 或者,您可以右键单击选定的单元格并选择 单元格格式 从上下文菜单。
  3. 单元格格式 对话框,在 联系电话 标签,请:
    1. 选择 定制版 从左侧的类别列表中。
    2. Type 下的输入框 定制版,输入以下格式代码: #“ 公斤”. 然后您可以在中预览新格式 样本 框以在应用前查看其外观。
    3. 点击 OK.

结果

现在,您选择的每个数字都将显示为 “公斤” 附加,而单元格中的实际值保持不变,因此涉及这些单元格的任何计算仍将使用纯数值数据,而无需 “公斤” 文本。

笔记:

  • 格式代码 #“ 公斤” 视觉上附加 “ 公斤” 对于所有包含数字的单元格,您可以按如下方式自定义:
    • 更换 kg 将要添加的文本放在引号内。
    • 如果您的单元格包含文本并且您想要将特定文本附加到其中,请替换 # (数字符号)与 @ (“at”符号)在格式代码中。

  • 直观地将文本添加到单元格的开头,先于 # 在您的格式代码和文本中。例如,输入 “文本 ”# 在格式框中将预先添加 “文本 ” 到所有数字单元格。

在每个单元格内的第 N 个字符后插入文本

在本节中,我们将探讨两种在每个单元格中的第 N 个字符后插入特定文本的方法:一种使用 替换公式 另一个带有 多功能工具。作为示例,我们将展示 如何在第 5 个字符后插入连字符 (-).


使用 REPLACE 公式在第 N 个字符后插入文本

要使用 REPLACE 函数在单元格中的第 N 个字符之后插入特定文本或字符,我们将遵循下面描述的模式。

=REPLACE(cell, N+1, 0, "text")

这个公式背后的逻辑是替换 0 (无)字符 单元格 在 (N + 1)th 位置与 “文本”。例如,要 在第 5 个字符后插入连字符 (-),我将使用下面的公式:

=REPLACE(A2, 6, 0, "-")


使用 Kutools for Excel 在第 N 个字符后插入文本

通过应用 Kutools for Excel's Add Text 函数中,您不仅可以将指定文本添加到单元格的开头或结尾,还可以添加到单元格内的指定位置。

在第 5 个字符后插入连字符 (-),选择一个或多个要插入连字符的范围,然后单击 库工具 > Text > Add Text。 在 Add Text 对话框,请执行以下操作:

  1. 输入连字符 (-) 在文本框中。
  2. 点击 指定位置 选项,然后输入 5 在第 5 个字符后插入连字符。 您可以在预览窗格中预览结果。
  3. 击中 OK.

请注意: 想要访问 添加文本 公用事业? 下载 Kutools for Excel 现在! 除此之外,Kutools 还拥有 300 多个其他功能,并提供 30 天免费试用。 不要等待,今天就尝试一下吧!


在特定字符之前/之后添加文本

在本节中,我们将探讨两种在 Excel 单元格中的特定字符之前或之后附加文本的方法:一种使用 替代公式 还有一个 多功能工具。为了便于说明,我们将演示 如何在单元格内容中的连字符 (-) 前后插入“(EO)”.


使用 SUBSTITUTE 公式在特定字符之前/之后插入文本

要使用 SUBSTITUTE 函数在单元格中的特定字符之前或之后插入文本或字符,我们将遵循下面描述的模式。

  • 前置文本 before 特定字符(“anchor_text”):

    =SUBSTITUTE(cell, "anchor_text", "added_text & anchor_text", 1)

  • 附加文本 after 特定字符(“anchor_text”):

    =SUBSTITUTE(cell, "anchor_text", "anchor_text & added_text", 1)

公式背后的逻辑是替换 “锚文本” 字幕可视电话用于 单元格 “添加的文本和锚文本” or “锚文本和添加文本”,以便插入 “添加的文本” 之前或之后 “锚文本”.

例如,插入“(EO)” before 单元格内容中的连字符 (-),使用以下公式:

=SUBSTITUTE(A2, "-", "(EO)-", 1)

提示:
  • 数量 1 SUBSTITUTE 公式中的命令告诉 Excel 仅替换单元格 A2 中第一次出现的连字符 (-)。如果有多个连字符并且您希望替换不同的连字符,请调整此数字以匹配您要定位的特定实例。添加“(EO)” 每个连字符之前,完全删除实例号:
    =SUBSTITUTE(A2, "-", "(EO)-")
  • 插入“(EO)” 连字符 (-) 之后,使用以下公式:
    =SUBSTITUTE(A2, "-", "-(EO)", 1)

使用 Kutools for Excel 在特定字符之前/之后插入文本

Kutools for Excel's Add Text 功能允许您轻松在单元格内的特定字符之前或之后添加文本。

在连字符 (-) 前插入“(EO)” 在单元格内容中,选择一个或多个要进行此修改的范围,然后单击 库工具 > Text > Add Text。 在 Add Text 对话框,请执行以下操作:

  1. Type (环氧乙烷) 在文本框中。
  2. 点击 正文前 选项,然后输入连字符 (-) 在相应的输入框中。 您可以在预览窗格中预览结果。
  3. 击中 OK 在连字符之前插入 (EO)。

请注意: 想要访问 添加文本 公用事业? 下载 Kutools for Excel 现在! 除此之外,Kutools 还拥有 300 多个其他功能,并提供 30 天免费试用。 不要等待,今天就尝试一下吧!


以上就是Excel中删除宏相关的全部内容。 我希望本教程对您有所帮助。 如果您想探索更多 Excel 提示和技巧, 请点击这里 访问我们广泛收集的超过数千个教程。

Comments (55)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Bonjour, J'ai besoin d'aide. J'ai un tableau excel dans lequel je veux dans une de mes colonnes que lorsque j'écris NOK la cellule se colore en rouge et les caractères en blanc.
En VBA J'ai déjà tout essayé comme message mais j'ai toujours une erreur. Mon problème se situe au niveau de la première ligne car je ne sais pas quoi écrire. Quand j'inscris NAME il ne fait rien. Quand j'inscris Value il ne fait rien. J'ai essayé TEXTBOX et le nom de la colonne CAISSE mais j'ai toujours une erreur.

If cell.Textboxcaisse = NOK Then
cell.Interior.ColorIndex = 3
cell.Font.ColorIndex = 2
cell.Font.Bold = True
End If
Next
For Each cell In Range("r3:r500")
If cell.Name = OK Then
cell.Interior.ColorIndex = 2
cell.Font.ColorIndex = 1
cell.Font.Bold = True
End If
Next

Merci pour votre aide.
This comment was minimized by the moderator on the site
Hi there,

Do you mean that you want the fill color to turn red and font color to turn white as long as the cell's content is NOK? So, if 10 cells have NOK as content, and the 10 cells are in the column you mentioned, the fill color and font color of all the 10 cells will change?

Also, can you speak English? So I can better understnd your situation. And it will be better if you attach the file with the VBA you created. So that we can help you revise it with higher efficiency.

Thanks in advance.
Amanda
This comment was minimized by the moderator on the site
Thank you!
This comment was minimized by the moderator on the site
the VBA code worked perfectly on Office for Mac
This comment was minimized by the moderator on the site
Me has quitado varias horas de trabajo de encima, mil gracias!!!
This comment was minimized by the moderator on the site
thanks a lot dear for sharing information.
This comment was minimized by the moderator on the site
Thank you! Apend and pre-pend macro works great
This comment was minimized by the moderator on the site
I am trying to change a date formula from mm/dd/yyyy to dd/mm/yyyy. The leading zeros for months and dates less than 10 (two digits) are going away. Anyone have tips on how to easily put them back. I tried using the =month, =day, =year formulas and concatenating them. However, the leading zeros are dropping off. I would manually have to put in the leading zeros. Is there an easy way to do this? We are going to have approximately 1,000 rows of data on our file each month.
This comment was minimized by the moderator on the site
Hi, Amanda, if you want to convert date from mm/dd/yyyy to dd/mm/yyyy, this article https://www.extendoffice.com/documents/excel/4646-excel-convert-dd-mm-yyyy-to-mm-dd-yyyy.html can help you, it list two easiest ways for solving this job.
This comment was minimized by the moderator on the site
I want to make a formula that show in cell text "Profit" when another cell show +digit, and show in that cell "Loss" when another that cell show -digit
This comment was minimized by the moderator on the site
Hi, Manik, use this =IF(B1>0, "Profit", "Loss")
This comment was minimized by the moderator on the site
Thanks a lot!! I was initially using Access but this is so much easier.
This comment was minimized by the moderator on the site
Hello, i want to add text in a formula;

current cell value: ='DAM91-SVC'!$C$47
i want to add text: [MHSV Sales Report 2017 (JAN-DEC).xlsx]

therefore the cell value should read like this in the end: ='[MHSV Sales Report 2017 (JAN-DEC).xlsx]DAM91-SVC'!$C$47

please tell me how will this be done.
thank you
total 1800 cell count need alteration.
This comment was minimized by the moderator on the site
Hello, sorry to read your question so late. Here is a solution but you need to free download Kutools for Excel.

Using the Convert Formula to Text utility to convert the formula cell to text, then apply Add Text utility to add the text string in the Specify position(1), then click Ok. After all cells have been added text, conver them to formula by click Kutools > Content > Convert Text to Formula.
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations