将选定的行单元格条目复制到其他工作表

时间:2018-02-07 04:29:37

标签: excel vba excel-vba

我试图提供选择行中行或列的功能,并将该行中的某些单元格复制到另一张表中。

例如......我有一个租客(行)列表,每个都有他们欠的金额和在一张纸上收集的金额,另一张是收据。我想输入收取的租金,并自动更新收据表,其他表格行/个人姓名和金额已收集。

是否有VB功能来识别活动行?

如果我可以开始工作,那么下一件事就是增加/增加发票号码。

1 个答案:

答案 0 :(得分:0)

您可以使用UsedRangeRows()属性的组合来获取有效行。

虽然不一定需要UsedRange,但它只会选择该行中使用过的单元格,而不是选择工作簿的整行,这很可能是不需要的。

您可以使用此功能:

Function rngActiveRow() As Range

    Dim ws As Worksheet
    Set ws = ActiveCell.Parent
    Set rngActiveRow = ws.UsedRange.Rows(ActiveCell.Row)

End Function

如果你想测试它,你可以尝试在测试子中调用这个函数来看它是否有效:

Sub test()

    rngActiveRow.Select

End Sub