範圍與xldown細胞

嘿，我有這部分代碼範圍與xldown細胞

Range("A2:BY2").Select 
Range(Selection, Selection.End(xlDown)).Select

我想轉換成細胞有我的代碼更快我想這

With Worksheets("BLOTTER") 
    Set rng = .Range(.Cells(1, 2), .Cells(77, 2).End(xlDown)) 
End With

但犯規似乎選擇好的範圍謝謝

怎麼樣：'set rng = activesheet.usedrange.cells' – Sam

爲什麼選擇這個範圍？你想執行操作嗎？我可以告訴你如何選擇這個範圍，但你應該避免使用。如果可能的話，如果你可以啓發我爲什麼你選擇這個範圍我可能會更好地幫助你。 – pegicity

不知道這是否有助於因爲我不確定我是否正確地記得結束，但它並沒有出現你正在使用正確的語法設置RNG聲明...試試這個：

Set rng = .Range(.Cells(1, 2).Address & ":" & .Cells(77, 2).End(xlDown).Address)

如果我記得正確的範圍內，需要將其設置爲一個字符串，或者至少我總是做這樣的說法，和。地址屬性將返回您引用的單元格的字符串名稱，例如.Cells（1，2）.Address返回「$ A $ 2」。

2014-02-25 18:30:03 MattB

這將選擇你想要的範圍，但是應該避免使用.Select。你爲什麼要選擇這個範圍？複製/粘貼？格式化？您無需爲這些操作選擇範圍。

Sub getRange() 


Dim rng As Range 

Set rng = Range("A2:BY2") 

rng.Select 

End Sub

2014-02-25 19:40:59 pegicity

回答