EXCEL vBA提指定内容到另表

1、用VBA，并给代码加表名
2、例
提取G列最后显示内容至另表B9
提取D列最后显示的上面笫二个单元内容至另表C9
提取B列最后显示的上面第五个单元内容至另表D9
请注释一下代码

Sub ww()
    With Sheet2 '指定另一个工作表是sheet2。
        G = [g65536].End(3).Row 'G列的最后一行的行号。
        D = [d65536].End(3).Row + 2 'D列最后一行的上面两行的行号。
        B = [b65536].End(3).Row + 5 'B列最后一行的上面两行的行号。
        .[b9] = Cells(G, "g") '将行号为G、列标为g的单元格中的数据赋值给另一工作表的B9单元格。
        .[C9] = Cells(D, "d") '
        .[D9] = Cells(B, "b") '
    End With
End Sub

Sub 复制()For k = 4 To Sheet1.[a65536].End(3).Row Sheet2.Cells(k - 1, 2) = Cells(k, 1)NextEnd Sub

sub s()     dim i%, c$     for i = 11 to 20         if sheets("a").cells(10, i) = 1 then             c = c & sheets("a").cells(9, i)         end if     next     sheets("1").[b25] = c end sub

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息