日常工作中我遇到過這樣一個問題。
由于軟件下載數據行數的限制,當我需要大量數據時隻能分批導出為多個表格。但是在處理數據時,我需要一個合并後的表格。
在沒有寫這篇文章之前我采取了最原始的方式,多次的Ctrl C,Ctrl V。
不斷的重複操作讓我很苦惱,于是就有了找快捷方式的想法。
通過一鍵操作,實現快速合并指定表格。
例如下圖的操作效果:
這為我節省了很多時間。
文末附有模闆下載鍊接,即使不理解代碼,也可以進行操作。
這裡的代碼并沒有足夠優化,對于所有的标題行也會被合并,如果有影響可以在合并後通過篩選後删除。
代碼主要通過Application.FileDialog(msoFileDialogOpen)打開選擇框,
For Each myfile In .SelectedItems循環複制已選擇表格,
Sheets(1).UsedRange.CopyThisWorkbook.Sheets("數據").Range("a"& R)黏貼複制的數據到當前表格。
歡迎點擊關注,後續會有更多精彩内容!
發送“鍊接”,可獲得Excel模闆及曆史文章模闆。
,更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!