☰

刪除Excel單元格中特定格式的文本

tag-icon • tag-icon microsoft-excel find-and-replace
刪除Excel單元格中特定格式的文本

如何輕鬆刪除具有特定格式的 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

結束功能

相關內容