親,打開你的Excel文件,按“Alt+F11”打開VBA編輯窗口,然后在左側(cè)空白處點(diǎn)擊右鍵,“插入”,“模塊”。右側(cè)空白處粘貼下面的代碼。關(guān)閉VBA窗口。
然后按“Alt+F8”打開宏窗口,點(diǎn)擊“選項(xiàng)”,在彈出窗口中按“Shift”,再按“a”,這樣就指定了“Ctrl+Shift+A”為快捷鍵。
使用的時候,只要選中要合并的單元格,按“Ctrl+Shift+A”快捷鍵,就會合并選中的單元格。
Sub hb()Selection.MergeEnd Sub