2012-12-17 91 views
2

這是迄今爲止我所擁有的。我需要一個sub來複制一組單元格並將它們的值粘貼到下一個可用的空單元格上。我得到的錯誤是選擇第一個可用的單元格。有什麼想法嗎?如何在VBA中選擇由變量引用的單元格

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` 
+0

找到答案是ActiveSheet.Cells(行,2)。選擇 – Luis

回答

4

在Excel中沒有測試,但應該工作,或至少指向你到正確的方向:

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

而應立即停止使用。選擇和選擇無處不在,他們是浪費時間。

+0

+1停止使用。選擇 –

+0

你是男人! – Luis

相關問題