如何在VBA中选择由变量引用的单元格

Question

这是迄今为止我所拥有的。我需要一个sub来复制一组单元格并将它们的值粘贴到下一个可用的空单元格上。我得到的错误是选择第一个可用的单元格。有什么想法吗？

Dim workline As Integer 
Sub Test() 
With ActiveSheet 
workline = 11 
    While .Cells(workline, 2) <> Empty 
    workline = workline + 1 
    Wend 
End With 
    Range("B3:CH9").Select 
    Selection.Copy 



    range(workline,2) .Select 



Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ 
    :=False, Transpose:=False 
Application.CutCopyMode = False 
Message = MsgBox("Data copied succesfully", vbInformation + vbOKOnly, "Aecon Mining") 
End Sub` 

Answer 1

在Excel中没有测试，但应该工作，或至少指向你到正确的方向：

Range("B3:CH9").Copy 
Range("B2").end(xlDown).offset(1,0).paste 'first available cell 

而应立即停止使用。选择和选择无处不在，他们是浪费时间。