「Excel VBA」LenB関数で文字列のバイト数を取得するサンプル
書式
LenB(文字列)
使用例
Sub funcA()
Dim nn As String
nn = "test123"
Debug.Print LenB(nn) '文字列のバイト数
Dim kk As String
kk = "テスト"
Debug.Print LenB(kk) '1全角文字は2バイト
End Sub
Sub funcA()
Dim nn As String
nn = "test123"
Debug.Print LenB(nn) '文字列のバイト数
Dim kk As String
kk = "テスト"
Debug.Print LenB(kk) '1全角文字は2バイト
End Sub
Sub funcA() Dim nn As String nn = "test123" Debug.Print LenB(nn) '文字列のバイト数 Dim kk As String kk = "テスト" Debug.Print LenB(kk) '1全角文字は2バイト End Sub
結果
14
6