利用Find找日期，出現錯誤!!

　暱稱: VBA向前衝

帖子: 559
主題: 58
精華: 0
積分: 626
點名: 0
作業系統: win8
軟體版本: office2013
閱讀權限: 50
性別: 男
來自: TW
註冊時間: 2010-11-22
最後登錄: 2024-6-14

3^#

發表於 2018-7-3 15:39 | 只看該作者

回復 2# linyancheng

所以，要設定哪個變數呢?? 該如何設定呢??

學習才能提升自己

hcm19522

大學生 Rank: 4

帖子: 1387
主題: 4
精華: 0
積分: 1397
點名: 0
作業系統: WIN
軟體版本: 2007
閱讀權限: 50
性別: 男
註冊時間: 2015-9-11
最後登錄: 2024-11-21

熱烈參與勳章

4^#

發表於 2018-7-3 16:05 | 只看該作者

X12=SUMPRODUCT((EOMONTH(G$11:G$1499*1,0)=EOMONTH(DATE(LOOKUP(9^9,V$12:V12),W12,1),0))*(M$11:M$1499=""))

google"EXCEL迷" blog 或google網址:https://hcm19522.blogspot.com/

　暱稱: VBA向前衝

帖子: 559
主題: 58
精華: 0
積分: 626
點名: 0
作業系統: win8
軟體版本: office2013
閱讀權限: 50
性別: 男
來自: TW
註冊時間: 2010-11-22
最後登錄: 2024-6-14

5^#

發表於 2018-7-3 16:20 | 只看該作者

回復 4# hcm19522

感謝!! 但需要的是程式碼的解決。 (因不止只有解決一筆，而是N筆資料。)

學習才能提升自己

hcm19522

大學生 Rank: 4

帖子: 1387
主題: 4
精華: 0
積分: 1397
點名: 0
作業系統: WIN
軟體版本: 2007
閱讀權限: 50
性別: 男
註冊時間: 2015-9-11
最後登錄: 2024-11-21

熱烈參與勳章

6^#

發表於 2018-7-3 16:29 | 只看該作者

回復 5# hugh0620
下拉~~~~~~

google"EXCEL迷" blog 或google網址:https://hcm19522.blogspot.com/

　暱稱: VBA向前衝

帖子: 559
主題: 58
精華: 0
積分: 626
點名: 0
作業系統: win8
軟體版本: office2013
閱讀權限: 50
性別: 男
來自: TW
註冊時間: 2010-11-22
最後登錄: 2024-6-14

7^#

發表於 2018-7-3 17:45 | 只看該作者

回復 6# hcm19522

         再次感謝!!

      但需要的是程式碼的解法，非函數的解法。
      資料是持續的更新，筆數不一定，不考慮用函數來解決這個問題。
      這個部分，僅是我整個架構一部分要解決的問題，所以，會考量到檔案大小的問題。

學習才能提升自己

naruto018

中學生 Rank: 2

帖子: 91
主題: 5
精華: 0
積分: 130
點名: 0
作業系統: Win10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
註冊時間: 2016-5-14
最後登錄: 2020-5-17

8^#

發表於 2018-7-4 08:04 | 只看該作者

回復 1# hugh0620

因為Find找不到要尋找的文字
所以回傳Nothing給變數
導致下一行變數的處理出錯

Kubi

中學生 Rank: 2

帖子: 163
主題: 1
精華: 0
積分: 170
點名: 0
作業系統: Window 7
軟體版本: Office 2007
閱讀權限: 20
性別: 男
註冊時間: 2010-9-5
最後登錄: 2022-7-20

9^#

發表於 2018-7-4 08:39 | 只看該作者

回復 1# hugh0620
A = A.Offset(0, 0).Row
等號右邊的 A 於上行被設定成 Range 物件變數，而等號左邊的 A 是卻是以數值變數(指向Row)呈現，可能是此陳述式出現矛盾的問題關鍵。
另外還需要如8樓的 naruto018 大說的 Find 須加寫若找不到時的防呆機制。

　暱稱: VBA向前衝

帖子: 559
主題: 58
精華: 0
積分: 626
點名: 0
作業系統: win8
軟體版本: office2013
閱讀權限: 50
性別: 男
來自: TW
註冊時間: 2010-11-22
最後登錄: 2024-6-14

10^#

發表於 2018-7-4 08:40 | 只看該作者

回復 8# naruto018

      問題清楚!!

      之前測試時，在RUN的時候是沒有問題，現在要把工具在做一些調整後，
      就發生這個Nothing的問題出來，有試著在程式碼修改，但試完還是錯誤，
      不知道該如何修正這個問題。

學習才能提升自己