Webとかからコピペした時に、
変なスペースが混じってる事ないですか??
『Non Break Space』と呼ばれるものらしく、
Webページ上で、スペースを空けたい時に使われてる
制御文字らしいです。
これがTRIMでは除去できないので、
この関数で半角スペースに変換しちゃいましょう～♪
*****************************************************************************************
Public Function fString_Trim_NonBreakSpace(Value As String, Optional ReplaceVal As String = " ") As String
'HTMLに含まれる不明なスペース[?]を除去する
'※上記の[?]はAscでは[63]を返すが、「?」とは異なる値(NoBreakSpace)
'※HTMLのソースでは「 」と記載
Dim NBSP(0 To 1) As Byte
NBSP(0) = 160
NBSP(1) = 0
fString_Trim_NonBreakSpace = Replace(Value, CStr(NBSP), ReplaceVal)
End Function