***************************************************************
文字列のバイト数を取得
※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