Question

我希望从第一个不允许的字符中删除字符串中的文本。我已经到目前为止，但现在我卡住了。

真实示例：

单元格值是： transactions_Label}“showEffect =”{showView}“width =”100％“height =”100％“transactionScreen =”true“/＆gt;

我希望唯一允许的字符是0-9 a-z和下划线_：

结果将是： transactions_Label

谢谢你能提供帮助

布赖恩

Answer 1

不喜欢回答我自己的问题，但这就是我在VBA中使用的内容：

Sub TrimRight()

    mycolumn = "E" 'Change to suit

    Dim MyRange, MyRange1 As Range

    LastRow = Cells(Rows.Count, mycolumn).End(xlUp).Row

    Set MyRange = Range(mycolumn & "1:" & mycolumn & LastRow)

    For Each c In MyRange
        For X = 1 To Len(c.Value)
            If Mid(c.Value, X, 1) Like "[!0-9A-Za-z_]" Then
                c.Value = Left(c.Value, X - 1)
                Exit For
            End If
         Next
    Next

End Sub

Excel：在第一个不允许的字符后删除文本

1 个答案: