「Excel VBA」LenB関数で文字列のバイト数を取得するサンプル

2021年7月27日

書式
LenB(文字列)
使用例

Plain text
Copy to clipboard
Open code in new window
EnlighterJS 3 Syntax Highlighter
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

Excel VBA

Posted by arkgame