我想腳本的一個非常基本的按鍵組在Excel中設置單元格引用右邊的單元格2,然後下一個非空白細胞下降。很容易設置的按鍵:下一個非空白單元格在Excel中/ visualBasic
=右右CTRL向下進入
但是,當我使用宏錄製做到這一點要與替換相對引用CTRL下降;即
ActiveCell.FormulaR1C1 = "=R[6]C[3]"
當然,有一個簡單的替代做我想要的?
我想腳本的一個非常基本的按鍵組在Excel中設置單元格引用右邊的單元格2,然後下一個非空白細胞下降。很容易設置的按鍵:下一個非空白單元格在Excel中/ visualBasic
=右右CTRL向下進入
但是,當我使用宏錄製做到這一點要與替換相對引用CTRL下降;即
ActiveCell.FormulaR1C1 = "=R[6]C[3]"
當然,有一個簡單的替代做我想要的?
dim Rng as range
set Rng=Activecell.offset(0,2).end(xldown)
是你的關鍵筆畫的相當,但它不是下一個非空白單元格,它的最後一個連續的非空單元格
值得一提的是,查爾斯的答案會帶你去在空白單元格之前的最後一個單元格。空白單元下面可能有更多細節。當我查找連續的最後一個單元格時,我從底部開始並繼續工作。
從活動單元格就應該是這樣的工作:
Dim col As Double
Dim rw As Double
col = ActiveCell.Column + 2
rw = 65000
Debug.Print col & "-" & rw
Cells(rw, col).End(xlUp).Select
值得關注的是查爾斯的答案將帶你用它的東西最後一個單元格空白單元格之前。空白單元下面可能有更多細節。當我查找連續的最後一個單元格時,我從底部開始並繼續工作。
從活動單元格就應該是這樣的工作:
Dim col As Double
Dim rw As Double
col = ActiveCell.Column + 2
rw = 65000
Cells(rw, col).End(xlUp).Select