返回列表 上一主題 發帖

[發問] [已解決]文字字串改為空字串

HSIEN6001

帖子
219 
主題
24 
精華
0 
積分
243 
點名
0  
作業系統
Windows10 
軟體版本
Office2016 
閱讀權限
20 
性別
女 
註冊時間
2012-4-18 
最後登錄
2022-2-7 

論壇榮譽勳章論壇贊助勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2012-5-23 19:11 | 顯示全部帖子

[發問] [已解決]文字字串改為空字串

本帖最後由 HSIEN6001 於 2012-5-24 01:43 編輯

請問,在迴圈裡碰到問題
應該為數字型態欄位的儲存格
出現不該出現的文字字串

如何,將不該出現的文字,取代為 "" 空字串

s2 = Replace(s2, #VALUE! , "")        '儲存格內有文字字元,取代為空字串 (#VALUE!   '非數字型態)

這樣寫不行 ^^!!
請教正確語法,謝謝!
收藏 分享

HSIEN6001

帖子
219 
主題
24 
精華
0 
積分
243 
點名
0  
作業系統
Windows10 
軟體版本
Office2016 
閱讀權限
20 
性別
女 
註冊時間
2012-4-18 
最後登錄
2022-2-7 

論壇榮譽勳章論壇贊助勳章
2#
發表於 2012-5-23 22:28 | 顯示全部帖子
本帖最後由 HSIEN6001 於 2012-5-23 22:30 編輯

回復 2# register313

不好意思!
可能我表達的不夠清楚

'......部分省略
Dim s2 As String


'......其中一段
            isdeli = False
            s2 = ""
            For i = 1 To Len(s1)
                ch = Mid(s1, i, 1)
                If Mid(s1, i, 1) = """" Then
                    isdeli = Not isdeli
                Else
                    If isdeli Then
                        If ch <> "," Then
                            s2 = s2 & ch
                        End If
                    Else
                        s2 = s2 & ch
                    End If
                End If
            Next
            s2 = Replace(s2, "--", "00")    '儲存格內有"--",取代為"00"

問題:
S2回傳資料時,其中數字型態的儲存格出現"中文字"--->程式中斷
  --->假如,不預設 [不清楚] 字元個數狀態下
該怎麼讓那個s2遇到"文字型態"時,傳回""空字串?!

TOP

HSIEN6001

帖子
219 
主題
24 
精華
0 
積分
243 
點名
0  
作業系統
Windows10 
軟體版本
Office2016 
閱讀權限
20 
性別
女 
註冊時間
2012-4-18 
最後登錄
2022-2-7 

論壇榮譽勳章論壇贊助勳章
3#
發表於 2012-5-24 01:49 | 顯示全部帖子
回復 4# register313

果然是我發錯主題,問錯方向
Sorry!!!!

VBA 匯入 Access
儲存格設定為數字型態時
出現非數字型態出錯

On Error Resume Next [已解決]

抱歉!!~深深一鞠躬!!

TOP

        靜思自在 : 太陽光大、父母恩大、君子量大，小人氣大。
返回列表 上一主題