excel如何使用巨集去計算範圍內的值?

2016-03-29 3:11 am

請教各位巨集高手
小弟不才，想請問如何可以使用巨集去計算A欄位的值?
使用錄製方式，當A1~A20輸入值後，啟動巨集在B欄位算出所減值
但，當A欄位變更到A30後，啟動巨集在B欄位仍只能計算到B20
如何可以對應A欄位有幾格，便計算到幾格?

更新1:

不好意思再請教一下先生下方是我錄製的巨集，不知該加在何處? Sub 巨集1() 巨集1 巨集快速鍵: Ctrl+e ActiveCell.FormulaR1C1 = "=RC[-1]-5" Range("B1").Select Selection.AutoFill Destination:=Range("B1:B20") Range("B1:B20").Select End Sub

回答 (2)

先生

2016-03-29 5:16 am

✔ 最佳答案

For i=1 to [B65536].end(xlup).Row
B欄最後非空白儲存格
[B65536].end(xlup).Row

👍 0 👎 0

Daniel

2016-03-31 2:16 am

.
Range("B1").Select
Selection.AutoFill Destination:=Range("B1:B20")
Range("B1:B20").Select

上方三行改為這一行即可:
[B1].AutoFill Destination:=[B1].Resize([A65536].End(3).Row)

👍 1 👎 0