為什麼這篇VBA 搜尋 日期鄉民發文收入到精華區：因為在VBA 搜尋 日期這個討論話題中，有許多相關的文章在討論，這篇最有參考價值！作者debbiejames ( . ignore)看板Visual_Basic標題[VBA ] 尋找...
想請問以下搜尋方式是否有誤呢?...
目的是想要在excel資料裡 搜尋區段時間的data然後複製
但我怎麼寫都會有問題..而且每次連續跑2次一定當掉..
可否幫忙看哪邊有問題呢?tks
其中cells(1,2)和cells(1,3)就是我所設定要搜尋的時間起始值和結束值
想要搜尋完後,將這區段的entire row選取複製...但目前寫不出來...
Sheet(1)是設定分頁
sheet(2)是所有data分頁
SHEET(3)是搜尋後,把區間的DATA複製貼上,但這步目前都沒做,光是複製
DATA就出問題了
Workbooks(main_book).Sheets(2).Select
Set searchdataSTART = Range("A:XX").Find(What:=Workbooks(main_book)._
Sheets(1).Cells(1, 2), LookIn:=xlValues)
Set searchdataEND = Range("A:XX").Find(What:=Workbooks(main_book)._
Sheets(1).Cells(1, 3), LookIn:=xlValues)
Rows(searchdataSTART.Row & ":" & searchdataEND.Row).Select
Selection.Copy
'Workbooks(main_book).Sheets(3).Select
'Cells(1, 1).Select
'ActiveSheet.Paste
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.35.119.189
※ 文章網址: https://www.ptt.cc/bbs/Visual_Basic/M.1512178658.A.2B3.html
※ 編輯: debbiejames (114.35.119.189), 12/02/2017 09:40:35
※ 編輯: debbiejames (114.35.119.189), 12/02/2017 09:42:12
※ 編輯: debbiejames (114.35.119.189), 12/02/2017 10:05:24
推 Iories: 先確認 Sheets(1).Cells(1, 2).Value 12/05 06:37
→ Iories: Sheets(1).Cells(1, 3).Value 的值都是正確的 12/05 06:37
→ Iories: 資料頁裡有要找的值嗎？沒有的話就沒有回傳值 12/05 06:38
→ Iories: 當然就不能copy (沒有row) 12/05 06:38
→ vincent0926: 將儲存格都改為日期格式後,用進階篩選設定起訖日期區 12/26 16:08
→ vincent0926: 間並複製到目的地工作,程式碼可錄製後參考程式碼,如 12/26 16:09
→ vincent0926: 要用您提供的程式碼請加入判斷確認起訖結果均有值 12/26 16:10