文字列のバイト数を取得

'文字のバイト数を取得
Debug.Print LenB(StrConv("あいうｱｲｳ", vbFromUnicode))

関数の解説

VBAではUnicode形式が採用されているため、全角も半角も2バイトで表現されています
そのため、普通に文字列を指定してバイト数を取得しようとしても全て2バイトで取得されてしまいます

LenB("あいうｱｲｳ")

→→→　12

このように、全角と半角が混じっていても同じ2バイトで取得されるため、半角文字が判別できません

なので、この文字形式を変換する必要があります
その変換に使用するのがStrConv関数です
引数の設定により、システムの既定文字形式に変換します

StrConv("あいうｱｲｳ", vbFromUnicode)

LenB関数の引数内にある、この変換により半角は1バイトで表現されるようになるため半角のバイト数も取得できるようになります

変換後のデータはVBAでは表現できませんので、StrConv関数だけ実行してもよくわからない結果が返ってくるだけです

LenB(StrConv("あいうｱｲｳ", vbFromUnicode))

→→→　9

例コードの実行結果として「あいう」は全角3文字で6バイト、「ｱｲｳ」は半角3文字で3バイトとなるので合計の「9」が返されます