エクセル:文字列のバイト数が欲しい
セルB1に、
半角スペース、全角2文字、半角スペース、
と入力しました。
このシートの別のセルに、
=Len(B1)と入力すると4と表示され、
=LenB(B1)と入力すると6と表示されますので、
間違いなく「半角スペース・全角2文字・半角スペース」がB1に入っているはずです。
このシートのコードに、
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$L$1" Then
MsgBox LenB(Cells(1, 2).Value)
End If
End Sub
と打ちました。
ここでシート上のセルL1に何か入力するとメッセージボックスが出るのですが、
メッセージボックスに出る値は8です。
何が原因でしょうか。
6が表示されて欲しいのですが(文字列のバイト数が欲しい)、
どのようにコードを書けばよいでしょうか。
実際にB1に入れていた文字は、
1B
です。
(半角スペース・全角数字1・全角英字B・半角スペース)
お礼
回答ありがとうございます。 解決しました。