如何在Excel中快速找到字符并用上标替换字符？

2024-07-11 13:14| 来源: 网络整理| 查看: 265

如何在Excel中快速找到字符并用上标替换字符？作者：孙最后修改时间：2020-09-18 doc查找替换上标1

在Excel中，我们可以通过应用“查找和替换”功能快速将另一个特定值替换为另一个值，但是您曾经遇到过这样的问题，即在特定文本字符串中查找特定字符并将其替换为上标格式，例如find YL3。然后将其替换为YL3，如下图所示。当然，您可以一一找到并替换它们，但是这种方法花费了太多时间。如果有任何技巧可以在Excel中快速替换为上标？按照本文，您将得到答案。

通过查找和替换功能查找和替换上标通过VBA查找并替换为上标

通过查找和替换功能查找和替换上标

实际上，您可以使用“查找并替换”来查找文本，然后以上标格式替换。

1.选择要查找并替换工作的范围，然后按 Ctrl + H 打开查找和替换对话。

2.在查找和替换对话框中，单击更换标签，然后将您要查找的文本输入到查找内容文本框。看截图： doc查找替换上标2

3。然后去更换文本框，输入您要替换的文本，注意，按住其他键，然后按 0179 按键号码牌输入上标数字3。请参见屏幕截图： doc查找替换上标3

4。点击 “全部替换”。随即弹出一个对话框，提醒您已完成了多少次替换。看截图： doc查找替换上标4

提示：但是使用这种方法时，只能按2来标记数字0178，而按3则可以标记0179。

通过VBA查找并替换为上标

使用查找和替换功能，只能用上标替换数字。如果要用上标替换字母，如下面的屏幕截图所示，则可以应用VBA代码来解决它。

1。按 Alt + F11键打开钥匙 Microsoft Visual Basic应用程序窗口。

2。点击插页 > 模块，然后将以下VBA代码粘贴到脚本中。

VBA：查找并替换为上标格式

Sub DoConvert() 'UpdatebyExtendoffice20160705 Dim xRg As Range Dim xTxt As String Dim xCell As Range On Error Resume Next If ActiveWindow.RangeSelection.Count > 1 Then xTxt = ActiveWindow.RangeSelection.AddressLocal Else xTxt = ActiveSheet.UsedRange.AddressLocal End If Set xRg = Application.InputBox("Select a range:", "Kutools for Excel", xTxt, , , , , 8) If xRg Is Nothing Then Exit Sub For Each xCell In xRg If xCell.Value = "YL3" Then xCell.Characters(1, 1).Font.Superscript = True End If Next End Sub

doc查找替换上标5

3。按 F5 键运行代码，并弹出一个对话框，提醒您选择一个范围。看截图： doc查找替换上标6

4。点击 OK，特定字符串中的特定字符已在选择中转换为上标格式。看截图： doc查找替换上标7

Tips:：在代码中，“YL3”是您要从中找到的字符串，并且（1，1）表示要转换字符串的前1个字符，如果要转换前两个字符，可以将其更改为（1，2），如果要从字符串的第二个字符转换1个字符，则可以将其更改为（ 2、1）。

使用 Kutools for Excel 增强您的 Excel 技能，体验前所未有的效率。 Kutools for Excel 提供了 300 多种高级功能来提高生产力并节省时间。单击此处获取您最需要的功能...

阅读更多免费下载... Office Tab 为 Office 带来选项卡式界面，让您的工作更加轻松在Word，Excel，PowerPoint中启用选项卡式编辑和阅读，发布者，Access，Visio和Project。在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。每天将您的工作效率提高50％，并减少数百次鼠标单击！ Excel 的屏幕截图（安装了 Office Tab）

阅读更多免费下载...

【本文地址】

公司简介

联系我们