返回列表 上一主題 發帖

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

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

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

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

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

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

這樣寫不行 ^^!!
請教正確語法,謝謝!

本帖最後由 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

回復 4# register313

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

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

On Error Resume Next [已解決]

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

TOP

        靜思自在 : 【生命在呼吸間】佛陀說:「生命在呼吸間。」人無法管住自己的生命,更無法擋住死期,讓自己永住人間。既然生命去來這麼無常,我們更應該好好地愛惜它、利用它、充實它,讓這無常、寶貴的生命,散發它真善美的光輝,映照出生命真正的價值。
返回列表 上一主題