2013-11-26 49 views
2

我處於想要從單元格開始的情況,E9說,而且我想選擇到列的末尾除了我不想要包括列中的最後2個單元格。Excel VBA - 選擇列尾減去兩行

因此,例如

A 
B 
C 
D 
E 

我要選擇的範圍A:C列,但不d和E

試過

ActiveSheet.Range("E9", ActiveSheet.Range("E9").End(xlUp)).Select 

,但不知道如何關閉最後兩個電池...

+0

select(range(A1).end(xldown).offset(-2,0)) – Roberto

+0

請告訴我們你試過了什麼?要求提供代碼的問題必須表明對正在解決的問題有一個最小的理解。包括嘗試的解決方案,爲什麼他們不工作,以及預期的結果。另見:[Stack Overflow question checklist](http://meta.stackexchange.com/questions/156810/stack-overflow-question-checklist) –

+2

@ Jean-FrançoisCorbett - 對不起,你是對的。這裏是我想要的正確語法:'Range(Range(「A1」),Range(「A1」)。End(xlDown).Offset(-2,0))。 – Roberto

回答

6
Range("E9", Cells(Rows.Count, "E").End(xlUp).Offset(-2)).Select 

儘管作爲一個經驗法則,你應該避免選擇語句。

2
Dim r as range 

set r = activesheet.range(activesheet.range("A1"), _ 
         activesheet.cells(rows.count,1).end(xlup)) 

if r.rows.count>2 then set r=r.resize(r.rows.count-2,1)