使用VBA給單元編寫公式

今天通過按鈕來針對單元格的操作

你可以輸入內容，也可以填寫公式，還可以向下填充，或是選擇不帶格式填充。

以下是原表,如果學過IF函數可以輕鬆完成，今天試試有VBA來做一下，也不復雜，主要是學習一下如何在單元格中輸入公式。

使用以下一段代碼：

填充之後效果如下：

代碼解釋如下：

Range("d5") = "=if(c5>=90,""優秀"",""一般"")"

請注意裏面if函數中的文本有兩個雙引號。這是因爲公式本身有一個雙引號開始，如果沒有兩個雙引號區分，比如"=if(c5>=90," 這樣就引號被結束了。

Range("D5").AutoFill Destination:=Range("D5:D13"), Type:=xlFillValues

相當於鼠標移到右下角變十字時，雙擊，這個可以錄製一段宏，查看代碼。

不用死記硬背。

子曰：用之則行，不用則藏。

意思是說，如果你用我的這些建議，就馬上行動，知行合一，如果你不用，就趕緊收藏，以絕後患。