Sub？宏2()
'
？Macro2？宏指令
？快捷鍵:？Ctrl+y '執行宏Macro2？的快捷方式
範圍(“B2:E13”)。選擇“選擇B2:E13”單元格。
用什麽？帶語句的選擇？選擇？牢房？" B2:E13 "
。橫向對齊？=?xlCenter？單元格格式-對齊？-?文本的對齊方式？-?水平居中
。垂直對齊？=?xlCenter？單元格格式-對齊？-?文本的對齊方式？-?嚴格地說
。WrapText？=?假的？單元格格式-對齊？-?文字。文字？-?自動換行
。定向？=?“0”單元格格式-對齊方式？-?文本的對齊方式？-?文本方向角度
。上癮？=?False“單元格格式對齊”?-?文本的對齊方式？-?等距分布
。IndentLevel？=?“0”單元格格式-對齊方式？-?文本的對齊方式？-?縮進(壹)
。ShrinkToFit？=?False“單元格格式對齊”?-?文字控制？-?減少字體填充
。閱讀順序？=?xlContext？單元格格式-對齊？-?文字方向從左到右？-?根據內容
。合並細胞？=?假的？單元格格式-對齊？-?文字控制？-?合並單元
結束？“With”With語句的結尾
選擇。NumberFormatLocal？=?"#,##0_?"？單元格格式-？數字？-?分類？-?自定義“# # # 0 _？”
列(“維:D”)。列寬？=?7.75?d列寬？=?7.75
列(“D:L”)。選擇？選擇d列到l列。
選擇。列寬？=?7.6?所選列(D列到L列)的寬度是多少？=?7.6
範圍(" N13 ")。選擇？選擇“N13”單元格(光標設置在N13)。
結束？Sub另外，如果是默認的，可以刪除。例如，上面的With語句可以簡化為:
用什麽？選擇？
。橫向對齊？=?xlCenter
。垂直對齊？=?xlCenter
結束？隨著