軟體:Excel
版本:2010
我錄製了一個巨集 用來把'a'分頁特定欄位複製到'b'分頁
假設內容為
4 4
5 5
6 6
7 7
在'b'結果會變成
9
10
11
12
空格以下的9~12都不會出現
請問該如何改善
錄製出的結果如下
Sheets("a").Select
Range("AU2").Select
Range(Selection, Selection.End(xlDown)).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("b").Select
Range("E2").Select
ActiveSheet.Paste
還請各位前輩賜教了 謝謝

原po要的功能是1.將4~12含空白儲存格貼到b工作表的"e2"，或是2.4~12但不含空白儲存格貼到b工作表的"E2"1的話要取最後有值的儲存格，可用range.end(xlup)2的話可用range specialcells，以原文來看的話，type為常數，value為xlnumbers看原po回文使用1的話，https://goo.gl/AChnPL 試試以連結檔案來看，出現錯誤1004，會於在b工作表執行該巨集稍微調整一下 https://goo.gl/AChnPL 重下試試如要在任何工作表都能執行且不用worksheet.select的話則使用 https://goo.gl/n6wcKL 這樣寫法試試