☰

删除活动单元格中的前导字符

tag-icon • tag-icon microsoft-excel microsoft-excel-2010 vba
删除活动单元格中的前导字符

下面的代码从单元格范围内的文本字符串中删除 123 个前导字符。我一直想把它改为从活动单元格而不是单元格范围内删除前导字符，但没有成功。我尝试将其更改为针对 Active.Cell 中的每个单元格......但没有成功。有人能帮我解决这个问题吗？

Sub Del()
Dim cell As Object

    For Each cell In Range("A2:A10")
        If Not IsEmpty(cell) Then
        cell.Value = Right(cell, Len(cell) - 123)
        Columns("A").HorizontalAlignment = xlCenter
    End If

    Next cell

答案1

子删除()

工作表("Sheet1").激活

ActiveCell.Value = Right(ActiveCell，Len(ActiveCell) - 123)

子目录结束

相关内容