Excel 在包含文本和数字的列中的数字后添加“%”
我有一个包含文本和数字的电子表格。我的老板让我在某一列的所有数字后面加一个百分号。我知道有一个简单的方法可以做到这一点,但我想不出来 文本示例如下: 评级为70。与团队合作很好。产量95,准确度98。需要信心训练 希望它是: 评级为70%。与团队合作很好。95%的产量和98%的准确度。需要信心训练。 非常感谢 下面是一个使用VBA的方法。选择要处理并运行此短宏的单元格:Excel 在包含文本和数字的列中的数字后添加“%”,excel,excel-2010,Excel,Excel 2010,我有一个包含文本和数字的电子表格。我的老板让我在某一列的所有数字后面加一个百分号。我知道有一个简单的方法可以做到这一点,但我想不出来 文本示例如下: 评级为70。与团队合作很好。产量95,准确度98。需要信心训练 希望它是: 评级为70%。与团队合作很好。95%的产量和98%的准确度。需要信心训练。 非常感谢 下面是一个使用VBA的方法。选择要处理并运行此短宏的单元格: Option Explicit Sub Percentology() Dim r As Range, sin As
Option Explicit
Sub Percentology()
Dim r As Range, sin As String, sout As String
Dim i As Long, L As Long, CH As String
For Each r In Selection
sin = r.Value
sout = ""
L = Len(sin)
sout = Left(sin, 1)
For i = 2 To L
CH = Mid(sin, i, 1)
If Not IsNumeric(CH) And IsNumeric(Right(sout, 1)) Then
sout = sout & "%"
End If
sout = sout & CH
If i = L And IsNumeric(CH) Then sout = sout & "%"
Next i
r.Value = sout
Next r
End Sub
之前:
及之后:
这使用了爬虫技术而不是正则表达式
编辑1:
宏非常易于安装和使用:
ALT-F11将显示VBE窗口
ALT-I
ALT-M打开一个新模块
粘贴内容并关闭VBE窗口
如果保存工作簿,宏将与工作簿一起保存。
如果在2003年以后使用Excel版本,则必须保存
文件的格式为.xlsm而不是.xlsx
要删除宏,请执行以下操作:
如上所述打开VBE窗口
清除代码
关闭VBE窗口
要使用Excel中的宏,请执行以下操作:
ALT-F8
选择宏
触跑
要了解有关宏的更多信息,请参阅:
及
必须启用宏才能使其工作 是否可以使用=concatenatecellref%,它在文本后面添加了%,而不是在numberHow about=cellref&%之后?这会将每个条目转换为文本。你真棒,我很感激你的回答,但我是一个完全的新手,甚至不知道宏放在哪里。@user7402286然后查看我的EDIT1