EXCEL用巨集寫出陣列公式 - 工作

Table of Contents

1.{=IF(R3="","",INDEX($B$3:$B$30002,SMALL(IF($Q$3:$Q$30002=1,ROW($Q$3:$Q$30002)),COUNTIF($R$3:$R3,R3))-2))}上述寫在單元格內,按下SHIFT+CTRL+ENTER後變成陣列公式,可以執行但每次開檔就會重萛,很麻煩所以想用巨集,我天真的寫成cells(1,1)="=IF(R3="","",INDEX($B$3:$B$30002,SMALL(IF($Q$3:$Q$30002=1,ROW($Q$3:$Q$30002)),COUNTIF($R$3:$R3,R3))-2))"但不能使用,請有問人可以教一下,在巨集中,如何去定義使用嗎?2.,如果要選取別的分頁單位格範圍,要怎麼寫例如在同一個分頁,我要選取一��

All Comments

Connor avatarConnor2015-01-19
Cells(1,1)="公式"陣列公式應寫為:Cells(1,1).FormulaArray="公式"要清除別的分頁,不要有選取(Select)的動作,例如:Sheets("分頁2").Range("$L$2:$N$30002").ClearContents2015-01-1900:37:51補充:鎖起來要取消保護,才能寫資料進去,寫完後再次鎖起來,就可再作到保護的工作,假設鎖定密碼為123,則程式碼:ActiveSheet.UnprotectPassword:="123"...寫入資料...ActiveSheet.ProtectPassword:="123"2015-01-1910:14:39補充:另外提醒,公式裡的雙引號,在VBA的雙引號要變成