作者o1o3o1o31030 (主席)
看板Office
標題[算表] VBA函數.find錯誤訊息
時間Fri Mar 17 22:58:38 2017
軟體:excel
版本:2013
x = WorksheetFunction.Max(Range("C16", Cells(16, 26)))
c = Range("C16", Cells(16, 26)).Find(x).Column
MsgBox (c)
我想找出該列最大值在哪一欄
一直出現未設定物件或WITH區域變數的錯誤代碼
或是我有其他發法可以執行呢?
謝謝各位
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 61.65.54.155
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1489762721.A.A52.html
2F：→ soyoso: 亦或原po實際巨集還有其他的部分呢？ 03/17 23:17
3F：→ soyoso: 如果c16:z16為日期格式的話則是會出現原文的錯誤訊息 03/17 23:27
5F：→ soyoso: 如c16:z16為日期格式而出現的錯誤的話，請將x宣告為date 03/17 23:29
7F：→ o1o3o1o31030: 疑?? 奇怪，確實沒有其他部分，格式為無限小數 03/18 00:46
8F：→ o1o3o1o31030: 還是excel版本? 我是2013 03/18 00:48
9F：→ soyoso: 提供檔案測試應會比較清楚 03/18 00:50
10F：→ o1o3o1o31030: ! 我鎖定工作表了! 03/18 00:58
11F：→ o1o3o1o31030: 好像也不適，我另外開一個像S大的就OK 03/18 01:02
12F：→ o1o3o1o31030: 但是我套在我要用的檔案上就不行，上面的格子是用 03/18 01:03
13F：→ o1o3o1o31030: 函數算的 03/18 01:08
※ 編輯: o1o3o1o31030 (1.164.137.2), 03/18/2017 01:08:20
16F：→ o1o3o1o31030: 列數是16沒錯，我截圖不小心切到 03/18 01:12
17F：→ o1o3o1o31030: 還是跟我有開啟其他增益集有關 03/18 01:13
19F：→ soyoso: 連結內儲存格的值測試上是用公式算出的 03/18 01:23
20F：→ o1o3o1o31030: 行!但.find真的奇怪找不出理由 03/18 01:38
21F：→ soyoso: 以range.numberformat及format調整，range.find應可使用 03/18 01:52
23F：→ o1o3o1o31030: 還是一樣QQ同樣的錯誤訊息在同樣一行 03/18 02:18
24F：→ soyoso: 將參數lookin設為xlvalues試試 03/18 10:23
25F：→ waiter337: 或者乾脆放棄find ,直接用迴圈逐行比對 03/18 20:58
26F：→ waiter337: 我在find之前遇到相同問題是日期部份,還有format部份 03/18 20:59
27F：推 waiter337: #1OUZWpJ4 這是之前s大回我的,但內容應該不同,只是延伸 03/18 21:05
28F：→ waiter337: 閱讀 03/18 21:05