教えて!ExcelVBA!

ExcelVBAの基礎知識・書き方について紹介します。

【ExcelVBA 関数】Len関数の使い方がわからないです。教えて!

f:id:m_kbou:20200420122811p:plain

Len関数は文字列の文字数を調べる場合に使用します。具体的な使い方について紹介します。

 

 

構文

記述方法は以下の通りとなります。

Len(”[文字列]”)

[説明]:

[文字列]には文字数を調べたい文字列を記述します。[文字列]は「”」(ダブルクォーテーション)で囲みます。内容を纏めると、「[文字列]で指定した文字列について、文字数を調べて表示して下さい。」との意味になります。

[記述例]:

Len("123456")
Len("123")

 

使い方

使い方について具体的に説明します。

半角文字列に対する文字数表示

半角文字列に対する文字数を表示する場合について説明します。

[プログラミング例]:

Sub サンプル()
  MsgBox Len("123456")
End Sub

内容は、「半角文字:123456について、文字数をMsgBoxで表示して下さい。」との意味になります。

f:id:m_kbou:20210428072728p:plain

※上記の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。 

[実行例]:

①<実行>ボタンには上記のプログラミング例のプログラムが登録されています。この<実行>ボタンをクリックします。(※ボタンの作り方やボタンにプログラムを割り当てるにはこちらを参考にして下さい。)

f:id:m_kbou:20210428072741p:plain

②結果は以下の様に表示されます。文字数は6つとなるため、MsgBoxで「6」が表示されます。

f:id:m_kbou:20210428072754p:plain

[サンプル]:

上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。

drive.google.com

半角文字列に対する文字数を表示する方法についての説明は以上です。

 

全角文字列に対する文字数表示

全角文字列に対する文字数を表示する場合について説明します。

[プログラミング例]:

Sub サンプル()
  MsgBox Len("123")
End Sub

内容は、「全角文字:123について、文字数をMsgBoxで表示して下さい。」との意味になります。

f:id:m_kbou:20210428072847p:plain

※上記の記述例は、VBE(VBA記述画面)に記述しないと実行ができません。VBEの開き方についてはこちらを参考にして下さい。 

[実行例]:

①<実行>ボタンには上記のプログラミング例のプログラムが登録されています。この<実行>ボタンをクリックします。(※ボタンの作り方やボタンにプログラムを割り当てるにはこちらを参考にして下さい。)

f:id:m_kbou:20210428072901p:plain

②結果は以下の様に表示されます。文字数は3つとなるため、MsgBoxで「3」が表示されます。

f:id:m_kbou:20210428072910p:plain

[サンプル]:

上記で説明したファイルをダウンロードできます。ご自由にお使い下さい。

drive.google.com

全角文字列に対する文字数を表示する方法についての説明は以上です。

 

プログラミング(サンプル)

プログラミング事例を紹介します。

www.osiete-excelvba.work

 

おわりに

今回はLen関数の使い方について説明しました。上記の例でもわかる通り、半角文字・全角文字に関係無く1文字は1つとしてカウントします。この点は注意して下さい。