![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
VBA初心者の質問です。
EXCELのVBAでセルの文字数バイト数を取得したくてLenB関数を使用しました。
しかし半角で入力してある文字(数字)でも1文字2バイトになってしまいます。
具体的に言うと以下の通りです。
---コード--------------
Dim test As Integer
test = Len(Activecell.Value)
-----------------------
Activecellのセル内容「東京1234」
TEST→「8」と取得したいのに「12」になってしまう。
--------------------
EXCEL上ではキチンと「12」になるのですがVBAでは違うのでしょうか。
どなたかご存じでしたら、よろしくお願いいたします。
No.3
- 回答日時:
VisualBasicのヘルプでも
MyString = "ABc"の例で
MyLen = LenB(MyString)
「' Windows の場合は 6、」と隅の方に書いてあって、Unicodeとの関連が示唆されています。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) サブフォルダ(データ)にある複数の.xlsxファイルのSheet3のA2セルの値で01から左側をB2 2 2022/08/14 15:46
- Excel(エクセル) Excleマクロ セル値の代入と文字列の結合について 3 2022/10/05 16:47
- Excel(エクセル) VBA フォルダ見える化のコードについて 2 2023/06/19 15:04
- Excel(エクセル) Excelの数式の質問です。 A列に「redhat 8.0, centOS 7.9, python 4 2023/05/12 19:38
- Excel(エクセル) Excelの文字列を数字に変換する方法について 6 2023/07/31 21:18
- Excel(エクセル) VBA カゥントで数値の範囲を規制 1 2022/05/20 06:20
- Visual Basic(VBA) Excle VBA Findメソッドについて 3 2022/07/15 13:56
- Visual Basic(VBA) エクセルの数式で教えてください。 1 2023/07/31 15:49
- Excel(エクセル) 関数EXACT(文字列,文字列)とexcelVBA 3 2022/04/14 15:07
- Visual Basic(VBA) Excel VBA 教えてください。 VBA初心者です。 詳しい方がいましたら教えてください。 下記 3 2023/04/25 11:22
このQ&Aを見た人はこんなQ&Aも見ています
-
「環境が人を育てる」って本当?環境によって人格や生き方は本当に変わるのか
環境が人生に与える影響は実際どれほどのものなのか、専門家の田宮由美さんに伺った。
-
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
StrConvでUnicodeに変換出来ない文字
Visual Basic(VBA)
-
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
-
4
VBAでの Replace関数で、ワイルドカードは使えないのでしょうか?
Visual Basic(VBA)
-
5
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
6
セル内の文字列が日本語か英語かを厳密に識別したい
Visual Basic(VBA)
-
7
VBA:小数点以下の数字を取得できる関数は?
Visual Basic(VBA)
-
8
エクセルVBAでシートモジュールでのパブリック変数
Excel(エクセル)
-
9
UTF-8で5~6バイトになる文字コード
その他(プログラミング・Web制作)
-
10
excel vba 名前付きセルが存在しないとき
Excel(エクセル)
-
11
メッセージボックスに表示する文字を大きくしたい
Excel(エクセル)
-
12
Excelの条件付き書式設定の太い罫線
Excel(エクセル)
-
13
Excelで数値→文字列変換で指数表示になったものをいっぺんに直したい
Excel(エクセル)
-
14
Access フォームのテキストボックスに半角英字のみで入力する設定は
Access(アクセス)
-
15
VBAコード記述に際して、コード全体を自動的にインデント付ける方法
Access(アクセス)
-
16
2つのテーブルに共通するレコードを削除したい
Access(アクセス)
-
17
エクセルでエラーが出て困っています。
Excel(エクセル)
-
18
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
19
ACCESSでコンボボックスにSQLで抽出した値を表示したい
その他(データベース)
-
20
Access サブフォームでの選択行の取得
その他(データベース)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
EXCELのVBAでLenB関数について
-
CString型 全角半角を意識せず...
-
TextFieldParserの固定長桁数を...
-
「シフトJIS X 0213」形式の文...
-
StrConvでUnicodeに変換出来な...
-
ファイル名の一部削除について
-
アクセス ステータスバーの文...
-
一番右のスペース以降の文字列...
-
WSTRINGとは?
-
VBScriptで半角カナと半角英数...
-
機種依存文字と特殊文字について
-
.htmlの前のファイル名が8文字...
-
VBA 変数名に変数を使用したい。
-
vba フィルター 複数条件 3つ以...
-
VBScriptでCSVファイルを読み出...
-
VB6.0の「vbFromUnicode」はVB....
-
【VB】コンボボックスにデータ...
-
【C#】textBoxの指定行のデータ...
-
Access 2010で実行時エラー3061
-
他のMDBのテーブルに追加したい
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ファイル名の一部削除について
-
EXCELのVBAでLenB関数について
-
CString型 全角半角を意識せず...
-
TextFieldParserの固定長桁数を...
-
文字列から、null値を除去する方法
-
一番右のスペース以降の文字列...
-
StrConvでUnicodeに変換出来な...
-
エクセルで13,410円を数値の134...
-
機種依存文字と特殊文字について
-
アクセス ステータスバーの文...
-
VB6.0 文字列のファイル書...
-
VB6のテキストボックスに入力し...
-
「シフトJIS X 0213」形式の文...
-
ワードのVBAで
-
VB.NET ListBox内の前方一致で...
-
【Excel VBA】セル内テキストの...
-
HEX
-
8進数文字、16進数文字とは
-
VBからID3タグをいじる方法
-
WSTRINGとは?
おすすめ情報