如何轻松删除具有特定格式的 Excel 单元格中的字符串。我想删除具有格式化字符串的单元格,如第二个单元格
字符串可以是任何东西,唯一定义他的是格式
答案1
如果单元格内的格式混合在一起,我看不出没有代码就可以做到这一点的方法。您可以使用如下所示的 UDF:
Function DeleteFormat(aSource As Range) As String
Underline = xlUnderlineStyleSingle
Strikethrough = True
DeleteFormat = ""
For i = 1 To Len(aSource.Value)
If Not (aSource.Characters(i, 1).Font.Strikethrough = Strikethrough And aSource.Characters(i, 1).Font.Underline = Underline) Then
DeleteFormat = DeleteFormat & aSource.Characters(i, 1).Text
End If
Next
结束函数