方法/步骤首先，我们在任意工作表标签上右击选择，查看代码，进入下一步
进入VBE界面以后，我们在工程窗口在，在工作表名称中标签上右击插入，选择插入模块
模块插好后，双击模块，粘贴如下代码：复制内容到剪贴板Sub合并单元格()DimMrow，i，k，dAsObjectApplication.DisplayAlerts=FalseSetd=CreateObject(scripting.dictionary)WithSheets(1)Mrow=.Cells(Rows.Count，1).End(3).RowFori=1ToMrowd(.Cells(i，1))=NextFork=0Tod.Count-1Fori=1ToMrow-1If.Cells(i，1)=.Cells(i+1，1)Then.Range(Ai:Ai+1).MergeEndIfNextNextEndWithApplication.DisplayAlerts=TrueEndSub代码粘贴完成后，需要关闭VBE编辑框，点X标记即可关闭
在开发工具中点击控件插入一个按钮控件，在工作表中鼠标拖动一个大小合适的按钮
右击新建的按钮，选择指定宏，选择我们合并单元格，即我们刚刚写的代码，然后点击确定完成
一切OK之后，我们只需要轻轻点击一下按钮，看到了吧，已经合并好了
