Excelのこととか色々

Excel のこととか楽天とか いろいろ書いてみます・・・

【Excel/VBAのこと19】リボンに登録していつでも文字数カウントできる

【Excel/VBA のこと 19】

   f:id:tuna-kichi:20200223230814p:plain

 

本日は、ほぼ雑記です。

 

私の業務の中で、「文字数」を気にする場合があります。

 

一覧表の全ての文言が調査対象ではなく、

 

一番長そうな文言をあたりを付けて調べる という程度です。

 

文字数を調べる関数は

 

Len(セル番地)

 

Len(Range("A1") )って感じ。

 

ひとつ、ふたつの単語の文字数を調べるのに、

 

毎回、この関数を書くのも ちょっと面倒なので、

 

マクロを作って、リボンに登録してしまいました。

 

 

Sub 文字数カウント()

 MsgBox Len(Selection)

End Sub

 

一行だけ。

 

これで、選択されているセルの文字数をカウントして、

 

メッセージボックスで表示させます。

 

これを、「個人用マクロブック」の標準モジュールに記述して、

 

リボンに登録 。

 

  文字数カウント

 

こういうの 意外と重宝するんです。

 

**********************************************************

 

個人用マクロブックについてはこちら

www.tuna-kichi.com

 

リボンに登録についてはこちら

www.tuna-kichi.com

 

_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/