使用VBA給單元編寫公式
今天通過按鈕來針對單元格的操作
你可以輸入內容,也可以填寫公式,還可以向下填充,或是選擇不帶格式填充。
以下是原表,如果學過IF函數可以輕鬆完成,今天試試有VBA來做一下,也不復雜,主要是學習一下如何在單元格中輸入公式。
使用以下一段代碼:
填充之後效果如下:
代碼解釋如下:
Range("d5") = "=if(c5>=90,""優秀"",""一般"")"
請注意裏面if函數中的文本有兩個雙引號。這是因爲公式本身有一個雙引號開始,如果沒有兩個雙引號區分,比如"=if(c5>=90," 這樣就引號被結束了。
Range("D5").AutoFill Destination:=Range("D5:D13"), Type:=xlFillValues
相當於鼠標移到右下角變十字時,雙擊,這個可以錄製一段宏,查看代碼。
不用死記硬背。
子曰:用之則行,不用則藏。
意思是說,如果你用我的這些建議,就馬上行動,知行合一,如果你不用,就趕緊收藏,以絕後患。