練習問題と内容について

・練習問題の狙い

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

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

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

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

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

・練習問題6について

こちらはマクロVBAの初歩的な知識になります。

指定された範囲のセル値の最大値を計算し、セル番地に結果を表示する練習問題となります。 それでは頑張っていきましょう！

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

問題内容

セル番地A1からA5までの値の中から最大値を見つけ、その結果をセル番地G1に表示する 

動作説明

VBAを使用して、指定された範囲のセル番地A1からA5までの値の中から最大値を見つけ、その結果をセル番地G1に表示します。
最大値とは対象の数値を一番大きな値です。
この問題では、セル番地A1からA5までの値を取得し、その中から最大値を見つけてセル番地G1に表示する必要があります。

ヒント

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

・ヒントその1

セル番地A1からB3の値の最大値を求めるには、セルの値を取得してから最大値を計算し、結果をセル番地G1に表示する必要があります。
１つずつ比較してもいいですが、WorksheetFunctionオブジェクトのmaxメソッドを使用する方法があります。

WorksheetFunctionで最大値を求めるためには、VBAの組み込み関数であるWorksheetFunction.maxを使用します。
例えば、max = WorksheetFunction.max(Range(“A1:B3“))というように、max関数を使ってセル範囲内の最大値を取得できます。

・ヒントその2

セルに値を最大値を見つけるためには、ループや条件分岐を使用することが有効です。
例えば、For Eachループを使用してセル番地A1からA5までの値を順番に比較します。

例えば下記のような見本を紹介します。

・ヒントその3

セルに値を表示するためには、Rangeオブジェクトを使用します。
セル番地を指定して該当するセルオブジェクトを取得し、Valueプロパティを使用して値を設定します。

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

・ヒントその4   (参考)

計算結果をセルに表示するには、Rangeオブジェクトを使用します。
セル番地を指定して該当するセルオブジェクトを取得し、Valueプロパティを使用して値を設定します。

例えば、指定セル.Value = 入力したい文字で文字の入力が可能です。
ちなみに省略しても機能します！ これらのヒントを参考にして、解答コードを作成してみてください。  

解答コード

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

・回答その①

上記のコードは、セル番地A1からA5の値を比較し、最大値をもとめて、その結果をセル番地G1に表示するVBAのマクロです。
解答コードでは、`maxValue `という変数を宣言し、セルの値を繰り返し処理で比較して最大値を計算しています。

最終的に、計算結果を`Range(“G1”).Value`に代入してセルに表示しています。
☟繰り返し処理の見本

・回答その②

解答コードでは、まずmaxValueという変数を宣言し、WorksheetFunction.max関数を使ってセル範囲の合計値を取得します。

取得した最大値を変数maxValueに代入し、最後にRange(“G1”).Valueにその値を表示します。

必要な知識

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

最大値の計算方法

まず、最大値の仕組みを知っておく必要があります。
通常の最大値を計算する記事で詳しく解説していますので是非参考にしてみてください。

セルの値の取得と設定

セルの値を取得するには、Valueプロパティを使用します。
例えば、Range(“A1”).ValueやCells(1, 1).Valueはセルの値を取得します。

セルの値を設定するにも、同様にValueプロパティを使用します。
例えば、Range(“A1”).Value = 10やCells(1, 1).Value = “Hello”といった形でセルに値を設定します。 下記参考記事で紹介しています！

変数の宣言と演算

VBAでは、変数を宣言して使用します。変数はDimステートメントを使用して宣言します。
例えば、Dim maxValue As Doubleとすると、maxValueという名前の変数をDouble型で宣言します。

演算においては、四則演算や比較演算子を使用します。
例えば、maxValue= maxValue+ 1とすると、maxValueの値に1を加えて再代入します。

WorksheetFunctionの使用

積を求めるためには、WorksheetFunctionが必要です。 下記参考記事で紹介しています！

ループ構造

最大値を求めるために、セル範囲内の各セルを順番にチェックするループ構造が必要です。
For Nextループを使った反復処理や、For Eachを使ったカウンターを利用した反復処理について理解しておくと良いでしょう。

これらの知識を応用して、問題を解くためのコードを作成しましょう。  

まとめ

この練習問題では、VBAを使用してセルの値の最大値を求める方法について学びました。

具体的には、セル番地A1からA5の値の最大値を計算し、その結果をセル番地G1に表示する問題を解きました。


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

次の練習問題では、さらに別の課題に取り組んでいきますので、順番に解いていくことでスキルを磨いていきましょう。
  以上で練習問題6となります。お疲れ様でした！

使用方法は関数の仕組みと同じです。
関数は下記リンクを参照してください。

【MAX関数】エクセルで範囲を指定して、数値の最大値を求める方法について ► 独学エクセル塾 (dokugakuexcel.com)

【MIN関数】エクセルで関数を使用して、最小値を求める方法について ► 独学エクセル塾 (dokugakuexcel.com)

分析などにはよく使用される関数ですよね。
是非参考にしてみてください。

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

■MAX関数で指定範囲の最大値を求める

・プログラムの仕組み

Cells(3, 5) = Application.WorksheetFunction.Max(最大値を求める範囲 )

・使用方法

では下図の例をもとに進めていきましょう

AさんからKさんまでの得点をＣ列に入力しており
今回はその最大値の最高得点を「E3」に入力してみましょう。

ではプログラムを組んでみましょう。
平均を求めたい範囲は「C3からC13」ですので下記のようになります。

Sub 最大値()

Cells(3, 5) = Application.WorksheetFunction.Max(Range(“C3:C13”))

End Sub

それでは実行した結果を見てみましょう。

最大値を求めることができました。
この中で一番大きな数値は「98」なので「98」が出力されました。
ちなみにCellsで表示するとこのようになります。

Cells(3, 5) = Application.WorksheetFunction.Max(Range(Cells(3, 3), Cells(13, 3)))

さらにRange変数を使用しても平均を求めることは可能です。

Sub 最大値()

Dim A As Range

Set A = Range(“C3:C13”)

Cells(3, 5) = Application.WorksheetFunction.Max(A)

End Sub

様々な場面に合わせて使用してみてください。

■MIN関数で指定範囲の最小値を求める

・プログラムの仕組み

Cells(3, 5) = Application.WorksheetFunction.MIN(最小値を求める範囲 )

・使用方法

では下図の例をもとに進めていきましょう

さきほど使用していたシートを元に進めていきましょう。
AさんからKさんまでの得点をＣ列に入力しており
今回はその最小値の最低得点を「E3」に入力してみましょう。

ではプログラムを組んでみましょう。
平均を求めたい範囲は「C3からC13」ですので下記のようになります。

Sub 最小値()

Cells(3, 5) = Application.WorksheetFunction.Min(Range(“C3:C13”))

End Sub

それでは実行した結果を見てみましょう。

最小値を求めることができました。
この中で一番大きな数値は「10」なので「10」が出力されました。
ちなみにCellsで表示するとこのようになります。

Cells(3, 5) = Application.WorksheetFunction.Min(Range(Cells(3, 3), Cells(13, 3)))

さらにRange変数を使用しても平均を求めることは可能です。

Sub 最小値()

Dim A As Range

Set A = Range(“C3:C13”)

Cells(3, 5) = Application.WorksheetFunction.Min(A)

End Sub

様々な場面に合わせて使用してみてください。

■よくあるエラーと対処法

・WorksheetFunctionクラスのMaxプロパティを取得できません・WorksheetFunctionクラスのMinプロパティを取得できません

こちらは対象の範囲にエラーが生じているかもしれません。
下図の見本を見てみましょう。

得点にエラーが存在しています。
先ほどの最小値を求めるプログラムを実行するとエラーになってます。

こちらの解決方法は参照範囲のエラーをなくすしかありません。
IFERROR関数などを使用してエラーにならない出力を検討してみましょう。

・最大値・最小値の結果が正しくない

こちらはセルの参照が間違っていないかを確認してください。
それでも結果が異なる場合は、表示形式が「文字列」になっている可能性があります。

下図を見てみましょう。

参照範囲が「文字列」で入力されている場合は数値としてみなされず
文字として判断されるため、平均されなくなります。

解決方法は表示形式を「標準」「数値」に戻して入力しなおすと解決します。

■公式の説明

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

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

Application.WorksheetFunction プロパティ (Excel) | Microsoft Docs

■まとめ

いかがだったでしょうか。

これでマクロVBAでもMAX・MIN関数を使用することができました。

Application.WorksheetFunctionは他にも様々な関数を使用できるので

ぜひ参考にしてみてください。記事はこちらから☟

【マクロVBA知識 22】ワークシート関数の機能を使用する~WorksheetFunction~ ► 独学エクセル塾 (dokugakuexcel.com)

それでは次回の記事でお会いしましょう。

エクセルを使用するうえでエラーや空白は付き物。
その際にエラーや空白を無視して計算したいですよね。今回はそれを可能する関数です。

この関数を使用するだけでエラーが発生する可能性がある場面は防ぐことができます。

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

■関数の仕組み

計算方法：どのような計算をするか選択する（合計や平均など）

除外のオプション：エラーや空白等、スルーする条件を決める

計算範囲：計算する範囲を決定する

■ エラーを無視して計算する

見本で下図のような得点表を作成しました。

今回はA～Jさんの点数の合計・平均を求めていきます。

各得点に様々なエラーが発生していますね。
この状態で計算してみます。

計算した結果がこちらです。

はい、このようにエラーになってしまいます。

このエラーを無視できるのが今回の関数です。

では、AGGREGATE関数の説明に移ります。
関数の内容はこちら。

=AGGREGATE(計算方法,除外のオプション,計算範囲)

では計算方法から見ていきましょう。

・計算方法

こちらでは合計・平均・最大値・最小値など、どの計算をするか選択できます。

計算できる手法は以下の通りです。当てはまる数値を入力すれば、その計算が可能です。

よく使うのは1.平均、2.カウント、4.MAX、5.MIN、9.合計ぐらいでしょうか。
標準偏差は分析マンには必需品のアイテムですね。

・除外のオプション

ここでは無視したいオプションを選択します。

文字通りなので説明しませんが、

迷ったら「7」の「非表示の行とエラー値を無視します」を選択で大丈夫です。

非表示の行の無視や、入れ子、エラー値のみ無視など様々なオプションがあるので場面によって

使い分けてみてください。

■実践する

・エラーを無視して合計を計算

では合計を打ち込んでみましょう。
計算方法は合計なので「9」。除外方法は「7」で設定します。
そして合計したい範囲を関数で打ち込むと以下のようになります。

=AGGREGATE(9,7,C3:C12)

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

エラーにならず、計算してくれていますね。

・エラーを無視して平均を計算

計算方法は平均なので「1」。除外方法は「7」で設定します。
そして合計したい範囲を関数で打ち込むと以下のようになります。

=AGGREGATE(1,7,C3:C12)

こちらもうまくいきましたね！

ぜひ活用してみてください。

■練習問題

・ 非表示の行とエラー値を無視して最大値（MAX）を計算

では下図の表を参考にしてみましょう。

対象はＣ3からC８とします。しかしエラーと空白が混じっているので無視します。

答え：=AGGREGATE(4,7,C3:C8)

解説：最大値(MAX)は「4」、非表示の行とエラー値を無視は「7」、範囲は「 C3:C8 」

・ 非表示の行とエラー値を無視して最小値（MIN）を計算

先ほどの計算を最小値（MIN）で計算してみましょう。

対象は先ほどと同様Ｃ3からC８とします。今回もエラーと空白が混じっているので無視します。

答え：=AGGREGATE(5,7,C3:C8)

解説：最大値(MAX)は「5」、非表示の行とエラー値を無視は「7」、範囲は「 C3:C8 」

■公式の説明

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

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

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

■まとめ

いかがだったでしょうか。

とても便利ですよね。私もこの関数を学んで

SUM関数やAVERAGE関数を使わない場面が増えました。

個人的にとても好きな関数です.

それでは次回の記事でお会いしましょう。

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

VBAではストーリー形式で説明していますが途中からでもわかるようにしています。ぜひ参考にしてみてください。

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

今回はエクセルで最大値を求めるMAX関数について説明していきます。
数ある数値の中で一番大きな数値を知りたいときに使用する関数です。

最大値からの比較など数値の分析にはよく使われますよね。

ぜひ参考にしてみてください！

対称となるMIN関数はこちらから☟

【MIN関数】エクセルで関数を使用して、最小値を求める方法について ► 独学エクセル塾 (dokugakuexcel.com)

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

■ 関数の仕組み

■ 最大値を求める

・通常の最大値の算出

今回はAさん・Bさん・Cさんのテストの点数を参考にしてみましょう。

下図の見本を見てみましょう。

国語・算数・理科・社会・英語の各点数を入力しています。

Cさんが優秀ですね…

今回はオレンジ色の「最高得点」を求めます。

使用する関数は「MAX関数」です。

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

このような画面になりましたかね？
そこで、Aさんの点の開始位置「85」をクリックしたまま、終点の「28」までスライドさせて範囲を決定させます。これによりAさんの点数がすべて網羅できた状態になります。

つまり関数で表すとこのようになります。

=MAX(C4:C8)

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

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

はい！社会の95点ですね！
ちなみにBさん・Ｃさんの最高得点を求めたいときは、関数を1から打ち込まなくても時短で打ち込める方法があります。

MAX関数が入ったセルを選択し、右下にマウスを合わせます。
そのままクリックして展開したい範囲までスライドさせると・・・

Bさん・Cさんも同じように最大値を求めることができます。
ちなみに最大値を求める範囲も追従してずれてくれるようになっています。

Bさん・Cさんそれぞれ関数の式を打ち込まなくても入力できるのでとても便利ですね。

・離れた範囲を選択して複数範囲の最大値を求める

下図のように最大値を求めたい範囲が離れていても最大値を求めることができます。

離れている範囲の最大値を求めたい場合には範囲の後に「,」を打ち込むか、

「Ctrl」を押しながら再度、範囲を選択すると複数範囲の最大値を求めることができます。

上図の見本を見てみましょう。

=MAX(C3:C7,F3:F7)

「Ｃ3：Ｃ7」と「Ｆ3：Ｆ7」の二つの範囲を参照していることがわかります。

・複数のシートをまたいで最大値を求める

さらに複数のシートをまたいでも最大値を求めることができます。

下記の式を見てみましょう

=MAX(Sheet1!P10:P24,Sheet2!Q9:Q25)

２つのシートの範囲を参照して最大値を求めています。

参照範囲は

①「シート：Sheet1」のＰ10からＰ24

②「シート：Sheet2」のＱ9からＱ25

となっています。

仕組みはシート名+「！」+範囲で

別シートを参照することができるようになります。

■よくあるエラーと対処法

ではMAX関数を使用して発生するエラーとそれに対する対処法を説明します。

・数値が文字列になっている

下記の式をご覧ください

5つの数値の最大値を算出する計算式になっています。

結果は一番大きな「95」になるはずです。しかし結果は下図のようになりました。

「95」ではなく、２番目の「85」になっています。

では「95」に注目してください。

左上に緑の印がついています。

本来数値は「標準」や「数値」となっています。

しかし左上に緑の印がついてある「95」はというと…

「文字列」になっています。

つまり「95」は数値として認識されておらず「文字」として認識しているため

無視されている計算になっています。

対処法：表示を標準・数値にもどし、再度入力すれば解消されます。

・最大値を算出する範囲にエラーが含まれている

では次のエラーを見てみましょう。

最大値を求める式は先ほどと同様です。

しかし数値の中にエラーが存在しています。

結果はこのようになります。

エラーに引っ張られて最大値の結果もエラーになってしまいました。

MAX関数は空白や文字列はスルー出来ますが、エラーはスルー出来ません。

対策を下記にまとめました。

対策①：参照のエラーを解消する

対策②：AGGREGATE関数を使用し、エラーをスルーして最大値を求める。

対策①は至ってシンプルです。

対策②はエラーが起こる可能性があるが、最大値を求めたい場合は

AGGREGATE関数を使用するとエラーもスルーすることができます。

AGGREGATE関数関数についてはこちら☟

【AGGREGATE関数】エクセルで空白やエラーを無視して合計・平均・最大値・最小値を求める。 ► 独学エクセル塾 (dokugakuexcel.com)

■公式の説明

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

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

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

■まとめ

いかがだったでしょうか。
最大値からの比較などでもよく用いられる関数です。

使い方はシンプルでとても使いやすいので実際に使用してみてください。

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

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

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

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