返回列表 上一主題 發帖

[發問] 跨工作表並指定儲存格在往下迴圈查詢

[發問] 跨工作表並指定儲存格在往下迴圈查詢

問題1:        工作表1(A,B,C,D,E,F)欄中,由數量(D)欄內儲存格判斷依據帶出資料轉換到工作表3(A,B,C,D,E,F)欄,(例如工作表3)依序迴圈往下排列                                                                                                               
                其工作表1中名稱(A)欄是下拉清單,編號(B)欄,商品(C)欄,價格(E)欄是固定資料,數量(D)欄是人工填入,總價(F)欄是(D2)*(E2)                                                                                                               
        問題2:        如轉換到工作表2可指定儲存格?當工作表1數量(D)欄由人工填入後用巨集按扭轉換到工作表2                                                                                                               
                例如:工作表1(A2)轉工作表2(B2),工作表1(B2)轉工作表2(B6),工作表1(C2)轉工作表2(C6),                                                                                                                    
                         工作表1(D2)轉工作表2(D6),工作表1(E2)轉工作表2(E6),工作表1(F2)轉工作表2(F6),                                                                                                               
                其中工作表1(A2)只帶出1次,其餘(B2:B12,C2:C12,D2:D12,E2:E12,F2:F12)依序迴圈往下排列                                                                                                               
問題1與問題2:                皆因是由數量(D)欄內儲存格中作為判斷依據帶出編號(B)欄,商品(C)欄,價格(E)欄,總價(F)欄,所以數量(D)欄是不確定哪列儲存格有數字                                                                                                               
                當數量(D)欄某一列儲存格有數字出現(或變化異動),也就是數量(D)欄某一列中出現0.1到99.9(或是有變化異動)時既可觸發帶出(B,C,D,E,F)欄                                                                                                               
                沒出現數字(或沒變化異動)的儲存格就不用帶出再繼續迴圈往下查詢至最後一列

謝謝准大
這些正是我想要做法.我用2個月時間網路練習作法想不到准大在幾小時內解析出,真是高手,高手,高高手謝謝你
因我是(60)進入Excel2個多月,請容我一一分解.真是謝謝你

TOP

回復 2# 准提部林

准大先進老師及各位先進前輩,不計另嗇多方指導"謝謝"                                                                                                                               
如上題有多方面理解獲益匪淺,但只理解皮毛.未深入原理.懇請再容多加努力.努力學習探討,(例如Dim R&, xR As Range, xE As Range, N&這些出至哪裡.函意為何                                                                                                                               
今如上題中再新增項目.請再賜教"謝謝"

TOP

回復 4# BV7BW


    抱歉.上傳資料有誤.再補船1次 抱歉

TOP

回復 6# 准提部林


   感謝准大先進.指導
   我在朝這方面努力探討.謝謝你
   如有不便之處.望請諒解...謝謝

TOP

回復 6# 准提部林


    修改後版本之增列部分
     [工作表6!G2] = [工作表1!G2]
     [工作表6!H2] = [工作表1!H2]
     [工作表6!I2] = [工作表1!I2]
     [工作表6!J2] = Date '記錄轉出日期時間
    [工作表1!I2] = Range("I2") + 1
Copy [工作表1!J2] '數量貼至備存區, 以供參考
不知從哪修改為往下排列
望請准大勞心指教
如蒙賜教,實感德惠

TOP

回復 10# 准提部林

謝謝你.我會加以理解真是感謝你
敏而好學,不恥下問

TOP

回復 13# 准提部林


    謝謝准大幫忙..辛苦了真感心
敏而好學,不恥下問

TOP

回復 15# 准提部林

再次謝謝准大勞心勞德解惑
我正演練操作.再一一跟你匯報.謝謝.感恩
敏而好學,不恥下問

TOP

回復 16# BV7BW

抱歉準大演練時不小心把列表機程式弄亂了自己修很多天才在向你報告
現有要改的再工作表6與4部分
敏而好學,不恥下問

TOP

        靜思自在 : 真正的愛心,是照顧好自己的這顆心。
返回列表 上一主題