返回列表 上一主題 發帖

請問只要在單數儲格1,3,5.…51寫入

回復 1# 自我感覺良好
發現一個有趣的現象
以本範例來說
  1. Sub ex()
  2. Selection = "=IF(MOD(ROW(),2)=0,RC,""ai"")"   '選取範圍寫入公式
  3. Selection = Selection.Value  '選取範圍公式轉成值
  4. End Sub
複製代碼
如果執行以上程式碼,可以達到類似勾選選項/計算/反覆計算的效果可以將偶數列的原值保留
但是,逐行以上程式碼就不能將偶數列的原值保留
學海無涯_不恥下問

TOP

        靜思自在 : 要用心,不要操心、煩心。
返回列表 上一主題