練習問題と内容について

・練習問題の狙い

このシリーズでは課題を元にマクロVBAを実践することでスキルを身につけることが出来ます。

正直、ソースコード作成については実践あるのみです！

答えのコードについては数例挙げますが、「もっといい答えがある」などの意見があれば

問い合わせから連絡ください！  

こんな問題を作ってほしいなどの意見もお待ちしております！

・練習問題16について

こちらはマクロVBAの知識で少し発展した課題になります。

指定されたセルを元に、空白セルの個数を表示する練習問題となります。

それでは頑張っていきましょう！

練習問題の内容と動作説明

問題内容

セル番地A1からA10までのセルのうち、空白セルの個数を表示する。

動作説明

VBAを使用して、指定された範囲のセルのうち、空白セルの個数をカウントし、結果を表示します。

この問題では、セル番地A1からA10までのセルのうち、空白セルの個数を求める必要があります。

ヒント

以下のヒントを参考にして解答コードを作成してみてください。

・ヒントその1

セルに値を表示するためには、Rangeオブジェクトを使用します。
セル番地を指定して該当するセルオブジェクトを取得し、計算する必要があります。

セル範囲を指定するには、Range(“D1:D5”)というように範囲の開始セルと終了セルを指定します

・ヒントその2

取得したデータの空白のセルを数えるには、関数を使用する必要があります。

例えば、WorksheetFunction.countBlank()関数を使用して、セル範囲の空白をカウントすることができます。

・ヒントその3

セルの値が空白かどうかを判定するためには、IsEmpty関数を使用します。

例えば、IsEmpty(Range(“A1”))というように使います。
IsEmpty関数は、セルが空白の場合にTrueを返します。

以上のヒントを参考に課題に取り組んでみてください！

解答コード

では回答を見ていきましょう！

・回答その①

それでは実行してみましょう。
結果はこのようになります。

A1からA10の空白セルの数は「４セル」ということがわかりました。

・回答その②

必要な知識

この問題を解くためには、以下の基本的な知識が必要です。

セルの判定

セルが空白であるかどうかを判定するために、IsEmpty関数を使用します。

IsEmpty関数は、指定されたセルが空白であればTrueを返します。

WorksheetFunctionの使用

空白セルのカウントをするためには、WorksheetFunctionが必要です。
下記参考記事で紹介しています！

まとめ

この練習問題では、VBAを使用して指定された範囲内の空白セルの個数をカウントする方法を学びました。

具体的には、セル番地A1からA10までの範囲において空白セルの個数を求める問題を解きました。
解答コードでは、For Eachループを使用して各セルを順に処理し、IsEmpty関数を使用してセルが空白かどうかを判定しました。

また、別の解答としてWorksheetFunction.CountBlankメソッドを使用する方法も紹介しました。
このメソッドを使うことで、より簡潔に空白セルの個数を取得することができます。

VBAを使うことで、Excelの操作を自動化し、複雑な処理を行うことができます。
練習問題を通じてVBAのスキルを向上させ、より高度な操作や処理を行えるようになることを目指しましょう。

以上が練習問題16となります。お疲れ様でした！

COUNT関数からの派生した関数ですね。

COUNT関数はこちらから☟

【COUNT関数】エクセルで数値のみのデータの個数を求める – 独学エクセル塾 (dokugakuexcel.com)

それでは見ていきましょう。

■関数の仕組み

■ 空白以外のデータの個数を求める

下図の勤務表をもとに仕事に行った日を数えてみましょう。

下図の見本を元に進めていきます。 出勤した日に○を入力する仕組みとします。

出勤確認担当者は上図のような出勤表を作成したとします。

出勤した場合、出勤した日に「○」を打ち込むようになってます。

そこで出勤日数（赤枠）を求めるには勤務時間のところに何個データがあればいいか求めることで出勤日数を求めることができます。
つまり今回の内容であるデータが何個あるか数えれば解決します。

そこで使用する関数が「COUNTA関数」。
「＝」の後にCOUNTAと打ちます。するとCOUNTA関数が出てくるのでダブルクリックします。

そこから、データを数えたい範囲を選択します。

今回は勤務表に○がついているか数えたいので範囲はC4:C13になりますね。

なので関数の式に直すとこのようになります。

=COUNTA(C4:C13)

では実際に打ち込んでみましょう。

この状態でEnterキーを押すと…

個数がカウントされました。現在は3日しか働いてないので、出勤日数1が算出されます。

そこから出勤した際に○を打ち込んでもらえば自動的に再計算が行われるため

空白以外のカウント、つまり出勤日数をカウントしてくれます。

COUNT関数では数値の個数のみでしたが、Aなど空白以外でもカウントしてくれます。

さらに参照先にエラーが存在しても空白以外なのでカウントします。

■ 空白データの個数を求める

今度は空白データの個数を求めてみましょう。

こちらはCOUNTA関数の対になるCOUNTBLANK関数を使用していきます。

使用方法は下記のようになります。

では先ほどのシートを使用して実際に使用してみましょう。

出勤すると「○」をつけるようになってますので

空白をカウントすれば休んだ日数をカウントできますね。

対象は「Ｃ3からＣ12」になってますので関数に当てはめてみましょう。

このようになります。

=COUNTBLANK(C3:C12)

実施した結果はこのようになります。

空白は6つあるのでうまく機能していますね。

ぜひCOUNTA関数と使い分けてみてください。

COUNTA関数ではエラーでもカウントしましたが、こちらはカウントされません。

■公式の説明

わかりやすいように説明したため公式と使用する語句が異なりますが

マイクロソフト公式の説明については下記のリンクを参照してください。

COUNTA関数はこちら☟

COUNTA 関数 – Office サポート (microsoft.com)

COUNTBLANK関数はこちら☟

COUNTBLANK 関数 – Office サポート (microsoft.com)

■練習問題

では練習問題でCOUNTA/ COUNTBLANK関数を復習してみてください。

・練習問題①

下図のアンケート結果をもとに練習します。

アンケートが1から10まであり、回答した個数を求めてみましょう。

つまり空白以外をカウントすれば答えが算出できます。

答え：=COUNTA(C3:C12)

表示はこのようになります。

・練習問題②

先ほどのアンケートを引き続き活用してみましょう。

今度は未回答数をカウントしてみましょう。

空白をカウントすれば算出することができます。

答え：=COUNTBLANK(C3:C12)

表示はこのようになります。

■まとめ

いかがだったでしょうか。
COUNT関数との違いも理解できたでしょうか。

今回は空白以外でしたが、さらに条件を設定するカウント関数もあります。

そちらに関しては下記の記事を参照してみてください。☟

【COUNTIF関数】エクセルで条件に合ったデータの個数をカウントする。 ► 独学エクセル塾 (dokugakuexcel.com)

では次回の記事でお会いしましょう！

このサイトでは独学でエクセルの技術を磨くことができます。基本操作やVBA、関数を随時更新中です。

関数の使い方や効果を、実際のエクセルを使用してわかりやすくしています。

いつかはエクセルの教科書のようなサイトを目指してます。
コメントで知りたいことや悩みなど記入していただければお答えしていきます。
ぜひ、ほかの記事もご覧ください。皆様の参考になれれば幸いです！