Question

我在excel中有这一列数据：

当用户按ctrl + c复制数据时，是否可以复制非零值？

Answer 1

这是可能的，但它可能会变得混乱。这是一种方法。确保为其分配一个非关键的快捷方式。 Ctrl-Shift-C ，可能，但是YMMV。

Sub ModifiedCopy()
    Dim RngToCopy As Range, Rng As Range, Cell As Range
    Set Rng = Selection
    LRow = Rng.Cells(Rows.Count, 1).End(xlUp).Row
    For Each Cell In Range(Rng.Cells(1, 1), Rng.Cells(LRow, 1))
        If Cell.Value <> 0 And Len(Cell.Value) > 0 Then
            If RngToCopy Is Nothing Then
                Set RngToCopy = Cell
            Else
                Set RngToCopy = Union(RngToCopy, Cell)
            End If
        End If
    Next Cell
    RngToCopy.Copy
End Sub

您应该在选择中看到非零，非空单元格周围的蚂蚁。

如果有帮助，请告诉我们。

是否可以在Excel中复制没有零值单元格的范围？

1 个答案: