12
返回列表 上一主題 發帖

[發問] 字串不被接受,會變error 1004,找不出問題

mylene

帖子
10 
主題
3 
精華
0 
積分
18 
點名
0  
作業系統
win 7 
軟體版本
office 2003 
閱讀權限
10 
註冊時間
2010-8-12 
最後登錄
2012-7-9 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2010-8-13 14:42 | 只看該作者

[發問] 字串不被接受,會變error 1004,找不出問題

請問各位先進一個問題
程式如附件 test-20100810.rar (190.81 KB)


我用Sheets(nowSheet).Range("A1").Offset(nowRow, nowCol) = "一串文字"
來放置字串
可是在正在狀況下,執行到nowRow=22959時,字串會被拒絕
為了方便測試
附件的字串我加了一個空白,執行約2次就被拒絕

想很久了不明白,同樣一樣,同樣格式的字串
但就是有些會不被接受

不是七月撞鬼，但真的就是找不出問題
請各位高手幫忙看看
收藏 分享

mylene

帖子
10 
主題
3 
精華
0 
積分
18 
點名
0  
作業系統
win 7 
軟體版本
office 2003 
閱讀權限
10 
註冊時間
2010-8-12 
最後登錄
2012-7-9 
18#
發表於 2010-9-3 16:14 | 只看該作者
回復 17# yangjie


    感謝您持續的回應
檔案已寄出去,麻煩您了
謝謝

TOP

yangjie

帖子
258 
主題
77 
精華
0 
積分
385 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2010-8-8 
最後登錄
2021-1-25 
17#
發表於 2010-9-3 14:43 | 只看該作者
真的很想知道原稿TryTry，可否Mail To me:[email protected]

TOP

mylene

帖子
10 
主題
3 
精華
0 
積分
18 
點名
0  
作業系統
win 7 
軟體版本
office 2003 
閱讀權限
10 
註冊時間
2010-8-12 
最後登錄
2012-7-9 
16#
發表於 2010-9-2 14:15 | 只看該作者
回復 15# yangjie


    感謝您的回覆
在我之前走投無路時,雖然理智上根本覺得不會是這個問題,但我還真的重灌過

結果當然沒有違背科學原則,一樣無效

TOP

yangjie

帖子
258 
主題
77 
精華
0 
積分
385 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2010-8-8 
最後登錄
2021-1-25 
15#
發表於 2010-8-28 00:57 | 只看該作者
office 重灌，可以試一試(我有過此經驗，office可能部份Dll檔不見了)

TOP

mylene

帖子
10 
主題
3 
精華
0 
積分
18 
點名
0  
作業系統
win 7 
軟體版本
office 2003 
閱讀權限
10 
註冊時間
2010-8-12 
最後登錄
2012-7-9 
14#
發表於 2010-8-26 10:32 | 只看該作者
回復 12# yangjie


    感謝您的回覆
在字串前加一個"'"也有試過,那一組過得去,接下來,其他有帶" ' "的又會遇到同樣的錯誤
已經不是加不加'的問題,而是,不知道為什麼excel會不接受字串
有鬼的又是在debug時,同一個位置,指定一個隨便設的字串,又接受

真的想破頭了

TOP

yangjie

帖子
258 
主題
77 
精華
0 
積分
385 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2010-8-8 
最後登錄
2021-1-25 
13#
發表於 2010-8-20 23:30 | 只看該作者
因為剛加入此家族，故還是小學生，沒有Download之功能，無法實際真正了解問題所在，但對Excel VBA很癡情。我很樂意參予

TOP

yangjie

帖子
258 
主題
77 
精華
0 
積分
385 
點名
0  
作業系統
Win7 
軟體版本
Office2010 
閱讀權限
20 
性別
男 
來自
Taiwan 
註冊時間
2010-8-8 
最後登錄
2021-1-25 
12#
發表於 2010-8-20 23:24 | 只看該作者
sheets(2).range("a1").offset(22959,66)="06.xx.xx.xx.xx.48"
PC 對 06.xx.xx.xx.xx.48誤為數值錯誤
可嘗試字串前加一個 '
sheets(2).range("a1").offset(22959,66)="'06.xx.xx.xx.xx.48"

TOP

mylene

帖子
10 
主題
3 
精華
0 
積分
18 
點名
0  
作業系統
win 7 
軟體版本
office 2003 
閱讀權限
10 
註冊時間
2010-8-12 
最後登錄
2012-7-9 
11#
發表於 2010-8-16 10:36 | 只看該作者
回復 10# GBKEE


    這個字串是沒什麼特殊的
   因為它單獨用指定時一樣寫得進去
   但是同一行程式再run個一百多次後,又踢出一個
   同樣格式,所以無法以某一個字串做特別處理
   打個比方,您可能就懂我的意思
   假設有一個100長度的陣列,我分別放1到100
     偏偏有時它會45,或38被拒,下次又換56,72被拒
   並不是那數字有什麼不一樣,都是數字,可是就會發生錯誤

   又不是一開始就錯才很難找出問題在哪

TOP

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
10#
發表於 2010-8-15 17:13 | 只看該作者
回復 9# mylene
執行到 sheets(2).range("a1").offset(22959,66)="06.xx.xx.xx.xx.48" (對不起,字串記不起來)   一定會錯
請試著把字串 找出來 大家參考

TOP

        靜思自在 : 能幹不幹，不如苦幹實幹。
12
返回列表 上一主題