返回列表 上一主題 發帖

[發問] 隔列複製資料至另一工作表,依對應欄位貼上

[發問] 隔列複製資料至另一工作表,依對應欄位貼上

本帖最後由 viggostar 於 2010-5-24 23:56 編輯

各位高手好,附檔是我做的sample檔

detail工作表為資料來源
Order工作表則是訂料單

內含的巨集語法是
將detail工作表中的資料依C欄的人員選出他還沒訂零件的項目
並將各個我需要的資料一一複製到order工作表的對應欄位中

我有想過用 (sheet1).range("a3").value=(sheet3).range(q3).value 之類的寫法, 就不需要select.copy那麼多次
                      ↑只是印象中記得這麼寫, 書不在手邊
但篩選後的資料並不是相鄰的列, 不知道語法該怎麼改寫

我想做的功能 (如"成果"工作表顯示)
1. 如上所說, 將detail工作表中篩選好的資料, 依不同欄位複製到order工作表的對應欄位中
2. 複製第二個人的資料後, 自動貼到最後一列資料的下一列

感謝各位高手幫忙 Sample.rar (9.39 KB)

回復 2# Hsieh

感謝板主的回覆
另有些問題再請教一下
1. CLM = "CLKMPY" 這部份,在我實際的檔案中,複製的是V、AA、AD、AO欄
      嘗試將""裡的值改在"VAAADAY"或"V" & ""AA" & "AD" & "AO",帶出來的值都不對,請問我該如何設定呢?
2. 實際檔案中"order"的a欄有數字,若使用板主您的程式碼,資料會貼在"order"工作表的第19列~
    且第1項中貼上的欄位在order工作表中並不連續,該如何解決呢?
(今天上傳的已是實際使用的檔案)
感謝幫忙!

Report_SAMPLE.rar (206.01 KB)

TOP

回復 4# Hsieh


可以了,感謝板主!

如果麻煩您逐行解說程式碼的意思,是不是會太過份 >"<

我知道有用到定義、迴圈

但 redim preserve 的意思不了解

為什麼可以只有with sheet1來執行

不需要指定sheet的名字是 order 或 detail

第一行的i、s後為什麼要加%、&完全不懂…

真的很不好意思麻煩你

若您有空再麻煩你回答我

感謝您~

TOP

非常感謝Hsieh版主的解說,還麻煩您給了那麼多資料
趁假日剛好努力鑽研

感謝!^^
ps. GBKEE版主的我也會試試看, 謝謝喔^^

TOP

        靜思自在 : 手心向下是助人,手心向上是求人;助人快樂,求人痛苦。
返回列表 上一主題