如何將日期格式更改爲月份（縮寫文本）

Question

我如何將2013年2月25日至2月的合成日期更改爲僅？ 意思是在這裏，它只提取縮寫月份。 我嘗試使用此代碼，但它簡化版，工作，並把它轉化2至7月

  Sheet1.Range("A2:A9") = Format(Date, "mmm") 

Answer 1

Sheet1.Range("A2:A9") = Application.text(Date, "mmm") 

Answer 2

你可以試試：

Sheet1.Range("A2:A9").NumberFormatLocal = "mmm" 

至於建議由@ user3271518，這是由發現錄製一個宏，改變格式，然後查看記錄的宏。