12
返回列表 上一主題 發帖

請求改良程式

198188

帖子
405 
主題
58 
精華
0 
積分
489 
點名
25  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
註冊時間
2012-10-30 
最後登錄
2024-5-10 
11# 跳轉到 »
發表於 2024-3-22 15:24 | 顯示全部帖子
回復 21# Andy2483


謝謝前輩指點。在下圖第#014， 欄L 部分“（）”不懂得刪除，請問以什麽規則來刪除的，我看看怎樣輸入來配合。

TOP

198188

帖子
405 
主題
58 
精華
0 
積分
489 
點名
25  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
註冊時間
2012-10-30 
最後登錄
2024-5-10 
12#
發表於 2024-3-22 16:18 | 顯示全部帖子
回復 23# Andy2483


我每次打開第一次執行都會有這個錯誤，然後我按結束，再按一次執行，就沒有問題。
不知道是哪方面的問題？

TOP

198188

帖子
405 
主題
58 
精華
0 
積分
489 
點名
25  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
註冊時間
2012-10-30 
最後登錄
2024-5-10 
13#
發表於 2024-3-25 16:27 | 顯示全部帖子
回復 26# Andy2483


   
也一樣有這個問題

TOP

198188

帖子
405 
主題
58 
精華
0 
積分
489 
點名
25  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
註冊時間
2012-10-30 
最後登錄
2024-5-10 
14#
發表於 2024-3-26 08:15 | 顯示全部帖子
回復 28# Andy2483


也一樣，有這個問題。

TOP

198188

帖子
405 
主題
58 
精華
0 
積分
489 
點名
25  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
註冊時間
2012-10-30 
最後登錄
2024-5-10 
15#
發表於 2024-4-12 17:57 | 顯示全部帖子
回復  198188

Option Explicit
Sub Map()
Application.DisplayAlerts = False: Application.ScreenUp ...
Andy2483 發表於 2024-3-22 08:51


前輩，可否給一下這個注釋，有的地方還是看不懂。

TOP

198188

帖子
405 
主題
58 
精華
0 
積分
489 
點名
25  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
註冊時間
2012-10-30 
最後登錄
2024-5-10 
16#
發表於 2024-4-16 09:59 | 顯示全部帖子
回復  198188

最近有點忙,請前輩舉出不懂的地方,後學有空會回復 或請另發話題請教前輩們
Andy2483 發表於 2024-4-16 08:55


沒事，不急，等前輩有時間在回復。
暫時是這句
If (Not A Like "[#]###") Or (IsError(D)) Or (Not Q Like "##?Q") Then MsgBox "資料不符規則1": Exit Sub

TOP

198188

帖子
405 
主題
58 
精華
0 
積分
489 
點名
25  
作業系統
win7 
軟體版本
office 2010 
閱讀權限
20 
性別
男 
註冊時間
2012-10-30 
最後登錄
2024-5-10 
17#
發表於 2024-4-19 17:42 | 顯示全部帖子
本帖最後由 198188 於 2024-4-19 17:47 編輯
回復  Andy2483


    曾經被01的高手指導過,他說少用冒號來連結程式碼,尤其是前面有if的時候
那只是看 ...
quickfixer 發表於 2024-4-17 11:28


謝謝前輩提醒。

TOP

        靜思自在 : 手心向下是助人，手心向上是求人；助人快樂，求人痛苦。
12
返回列表 上一主題