我試圖複製活動列,並將其旁邊粘貼但代碼選擇整個工作表,因爲它已合併單元格英寸VBA代碼與合併單元格複製和粘貼活動列內
Sub CopyPaste()
Columns(ActiveCell.Column).Selection
Selection.Copy
ActiveCell.Offset(0,1).PasteSpecial Paste:=xlPasteAll
End Sub
您能否幫我添加缺少的代碼來忽略合併的單元格?
我試圖複製活動列,並將其旁邊粘貼但代碼選擇整個工作表,因爲它已合併單元格英寸VBA代碼與合併單元格複製和粘貼活動列內
Sub CopyPaste()
Columns(ActiveCell.Column).Selection
Selection.Copy
ActiveCell.Offset(0,1).PasteSpecial Paste:=xlPasteAll
End Sub
您能否幫我添加缺少的代碼來忽略合併的單元格?
這是另一個原因,以避免在VBA使用Select
爲Excel。您的選擇將隨合併單元格一起展開。你可以試試這個:
ActiveCell.EntireColumn.Copy ActiveCell.Offset(0, 1).EntireColumn
再次,你應該找到一些方式來避免在你的代碼上ActiveCell計數,並使用一些完全合格範圍內。
感謝您的幫助。我不習慣代碼,而無需選擇,需要更換新的編碼,而不選擇 – Maxwell
@Maxwell - 參見[如何避免在Excel中VBA宏使用Select(http://stackoverflow.com/questions/10714251/how-to在-Excel的VBA的宏 - 避免使用 - - 選擇 - )。 – Jeeped
@Maxwell SO Excel-VBA文檔也可以幫助您,例如[最佳實踐](http://stackoverflow.com/documentation/excel-vba/1107/vba-best-practices#t=201704111544413447144)。 – SteveES
是什麼'欄(ActiveCell.Column).Selection'嗎? – Jeeped