Excel中vba宏代碼合并單元格的方法

Excel中vba宏代碼合并單元格的方法

文章介紹excel中用vba宏代碼來進行合并單元格的操作過程，以及用VBA宏代碼語句判斷單元格是否為合并單元格。

以前的文章介紹excel合并單元格多是基礎操作，本文介紹關于excel合并單元格宏VBA代碼方面的應用。

第一，用VBA宏判斷excel合并單元格

在excel中按下ALT+F11，打開VBE編輯器，復制下面代碼，按F5鍵運行，如果A1單元格為合并單元格，則彈出消息框提示此單元格為合并單元格，如果A1單元格沒有合并，消息框提示此單元格不是合并單元格。

Sub excel合并單元格宏()If Range("A1").MergeCells ThenMsgBox "此單元格為合并單元格"ElseMsgBox "此單元格不是合并單元格"End IfEnd Sub

第二，用宏VBA代碼來進行合并單元格

用上面介紹的方法，復制下面這段代碼，運行的結果是：當我們在輸入框輸入一個行號，然后excel會自動合并A1到輸入行號的單元格區域。比如我們輸入8，excel則合并A1：A8單元格區域。

Sub合并單元格宏()Dim x1 As Longx1 = InputBox("請輸入行號：")Sheets("sheet1").Range("a1:a" & x1).MergeEnd Sub

又比如下面這段宏VBA代碼可以實現C6:F10單元格區域合并。

Sub 合并單元格()Range("C6:F10 ").MergeCells = TrueEnd Sub

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。

版權聲明：本文內容由網絡用戶投稿，版權歸原作者所有，本站不擁有其著作權，亦不承擔相應法律責任。如果您發現本站中有涉嫌抄襲或描述失實的內容，請聯系我們jiasou666@gmail.com 處理，核實后本網站將在24小時內刪除侵權內容。