下載：https://goo.gl/NCGsnY
使用方法：#1PlggT3y
Demo：https://noworneverev.github.io/images/font.gif
圖文版：https://noworneverev.github.io/2017/10/01/font/
此篇介紹的是極為簡單的自訂字型按鈕，在事務所工作每天要碰到Excel，
而工作表常常需要選擇字型與字型大小，讓PBC或底稿變得更美觀一點，
有些IC更會要求底稿的字型與格式，
個人認為選字型這種事很浪費時間，可以一鍵做到的事絕不再多花一絲力氣，
所以呢這篇懂VBA的人看可能會覺得hen87，
不過我想對很多人來說應該是會有些幫助的。
這次的font.xlam可使用的有以下兩個功能：
Sub Font()
Cells.Select
Selection.Font.Name = "微軟正黑體"
Selection.Font.Size = "10"
ActiveSheet.Range("A1").Select
End Sub
Cells.Select全選儲存格，然後更改選取的儲存格字型為"微軟正黑體"，大小"10"，
最後選取的儲存格為A1(字型或大小都可視自己需要做更改)
上方有些重複的語法可改寫成：
With Selection.Font
.Name = "微軟正黑體"
.Size = "10"
End With
之後會有幾百行的程式，擅用With可以很大程度的讓程式更好讀
'