susan 发表于 2014-2-13 11:48:22

有条件删除当前行

Sub 有条件删除当前行()
    If = 2 Or = "删除" Then
      Selection.Delete Shift:=xlUp
    End If
End Sub

286300390 发表于 2017-3-16 23:05:08

兄弟这个怎么使用呢??

286300390 发表于 2017-3-16 23:05:33

兄弟这个怎么使用呢??
页: [1]
查看完整版本: 有条件删除当前行