2015-07-21 50 views
-3

我正在尋找從列E開始在第6行復制動態更改範圍的值,並粘貼到另一個工作表(從列G行15開始)。數字可以粘貼爲值。將1列,動態範圍複製/粘貼到單獨的工作表中

本質上,我希望複製功能在行變爲空白時停止。

很多VBA新手,但我已經做了一些亂七八糟。

謝謝!

+4

好吧什麼是混亂? 'VBA代碼?'我們可以看到你到目前爲止嘗試過什麼,以及你嘗試失敗的地方? – 0m3r

+0

對不起,我沒有發佈我有什麼,我從來沒有使用過這個網站,我只是闖入一些基本的宏來幫助我的公司。從現在開始,我會發布我的嘗試。 @Omar – jdahl32

回答

0

歡迎計算器:)

Range("E6", Range("E" & ActiveSheet.Rows.Count).End(xlUp)).Copy 
Range("G" & ActiveSheet.Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial 

看起來混亂,但這個是什麼意思:E6的該行的底部

範圍Ctrl +向上箭頭

複製

行G的底部ctrl +向上的箭頭然後向下一個空白

粘貼

未來如果您需要幫助,請確保顯示足夠的細節以證明您已經完成並且不僅僅是想爲您編寫代碼,那是以上評論的意思。

祝你好運

+0

感謝您的反饋!這是我最終在答案之前計算出的結果: LastRow =表(「產品數據樞軸」)範圍(「E」和行數。)結束(xlUp).Row LastCol =範圍(「 A1「)。End(xlToRight).Column Sheet(」Prod Data Pivot「)。Range(」E6:E「&LastRow).Copy Sheets(1).Range(」G15「)。PasteSpecial Paste: = xlPasteValues,Operation:= xlNone,SkipBlanks:= False,Transpose:= False @AndrewT – jdahl32

+0

@jdahl32沒問題,那麼這樣解決了你的問題嗎?如果是這樣,請選中該框,否則請告訴我是否可以進一步提供幫助。 – AndrewT

相關問題