ライブラリ

fString_LenB

***************************************************************
文字列のバイト数を取得
※VBAのLenBが正しくバイト数を返せない為

【引数】Value :対象の文字列
***************************************************************

Public Function fString_LenB(Value As String) As Long
'文字列のバイト数を返す(マルチバイト(MBCS:Multibyte Character Set)に対応)
'【参考】シート関数LenBと同じ
'【注意】VBAのLenB関数では、全てが2バイト文字として換算されてしまう為、本関数で対応([A]が2バイトとして)
    
    fString_LenB = LenB(StrConv(Value, vbFromUnicode))
    
End Function

String   2017/11/21   shono

この記事へのコメント

コメントを送る

 
※ メールは公開されません
Loading...
 画像の文字を入力してください