【就労支援×Excel】家計簿入力訓練を自動化するVBAお題生成システムの作り方

Excel と VBA を使った「家計簿入力トレーニング」は、就労支援・自立訓練の現場で非常に効果の高い訓練方法です。

前回の記事では、Excel 上で動作する ストップウォッチ（スタート／ストップ／リセット） の作り方を紹介しました。

今回はその応用として、支援現場で実際に使える 「家計簿入力訓練ツール」 を作っていきます。

上記尾用に実務レベルの機能を備えています。

Excel と VBA の組み合わせで、ここまで「訓練ツール」として完成度の高い仕組みを作れることを、ぜひこの記事を通して体験してみてください。

また、もしマクロやVBAなどの基本部分から学びたい方は【初心者向け】Excelのマクロ・VBAの基本まとめの記事から見てみましょう。

家計簿入力訓練ツールとは？

Excel を使った家計簿入力は、就労支援・自立訓練の現場で非常に効果の高いトレーニングです。

私は現役の就労支援員として、Excel講座や就職活動の前段階で訓練している内容の応用版です。

特に「正確性」「集中力」「時間管理」の3つを同時に鍛えられるため、事務職・軽作業・PC業務など幅広い職種に応用できます。

しかし、家計簿入力の訓練を毎回手作業で作成するのは大変です。

そこで今回の記事では、Excel と VBA を使って、家計簿入力のお題を自動生成し、採点まで自動化できるシステムの作り方を紹介します。

 

支援現場でのニーズと課題

支援現場では「入力の正確性を鍛えたい」「毎月の訓練内容を自動化したい」という声が多くあります。
しかし、手作業で家計簿データを作ると時間がかかり、支援員の負担も大きくなります。

今回のシステムは、支援員の負担を減らしつつ、利用者の学習効果を最大化することを目的にしています。

 

Excel × VBA で訓練を自動化するメリット

今回のツールを利用するメリットは以下となります。

• 12か月分のお題を一瞬で作成できる
• 利用者の入力結果を自動採点できる
• 間違い箇所を赤字太字で強調できる
• 採点結果を一覧表に自動記録できる
• ストップウォッチと組み合わせて時間管理訓練も可能

今回作るシステムの全体像

今回作る家計簿入力訓練システムは、以下の3つのシートで構成されています。

 

お題生成シート（1月～12月）

支援員がボタンを押すだけで、12か月分のお題シートが自動生成されます。
収入・支出の金額はランダムで作成され、利用者ごとに異なる家計簿を作ることができます。

 

利用者用家計簿シート（黒子 家の家計簿など）

利用者が実際に入力する家計簿シートです。
ストップウォッチ機能（前回の記事で紹介）と組み合わせることで、時間管理の訓練にもなります。

 

採点シート（正解数・ミス数・正解率）

採点結果を自動で記録するシートです。
正解数・ミス数・正解率は自動計算され、グラフで視覚的に確認できます。

 

ストップウォッチとの連携（前回記事）

前回の記事で紹介した「スタート／ストップ／リセット」のストップウォッチ機能を使うことで、入力時間の計測も可能になります。

お題生成シートの作り方

それでは、実際にお題生成シートの作り方に入ります。

家計簿シートのテンプレート作成

Excelを起動したら、「その他のテンプレート」をクリックします。

次に、「月間家計簿」のテンプレートをクリックします。私の場合は最近使ったので一番最初にあるのですが、並び順は人によって違います。

「作成」をクリックします。

私は文字の色が見えにくいと感じたので、黒色に変更しました。また、年数は2026など好きな年数に変えてもいいと思います。

ストップウォッチ導入

前回の記事【VBA】ストップウォッチの作り方とコードを初心者向けに解説！で紹介したように、ストップウォッチも入れてみましょう。

E2セルに開始、F2セルに終了、F2セルに時間と入力します。

マクロのボタンはVBAのボタン挿入でもいいのですが、私は好みの色に自由にカスタマイズするために図形を配置してマクロを設定することが多いです。

マクロのコードはまだ入力していないので、まずは以下の図のように下準備をします。

 

次にAlt+11でコード入力画面になりますので、「挿入」タブで標準モジュールを挿入します。

標準モジュールの中に以下のコードを入力します。

 

コードを入れるのはこの場所になります。

コードを入力したので、マクロをそれぞれ登録します。

スタートはStartTimerを登録、ストップはStopTimer、リセットはResetTimerです。ボタンをクリックすると以下のようにストップウォッチが動作するはずです。

 

12か月分のシートを自動生成するVBA

ボタンを押すだけで、1月?12月のシートを自動生成します。
各シートには氏名・収入・支出の項目が整形された状態で作成されます。

標準モジュールの先ほどのストップウォッチのコードの下に、以下のコードも追記します。

 

また、今回は「お題生成」というシートにボタンを配置し、先ほどのマクロを入れたいと思います。

マクロはGenerateOdiaを設定します。

また、お題を作った後にシートを削除することを効率化するため、削除シートボタンも作ってみましょう。こちらは先ほどのコードに実は入れていますので、そのままDeleteOdiaSheetsのマクロを登録します。

ボタンを実際に押してみましょう。

一気に1年分作られ、さらに削除シートボタンをクリックするとシートガ削除されると思います。

ちなみに氏名はアニメの名前の苗字で作ってみたのですが、コードの中にある氏名を変えても大丈夫です。

 

収入・支出のランダム生成ロジック

収入1・収入2・その他収入・住居費・食料品などの金額は、RandBetween 関数を使ってランダム生成します。
これにより、毎回異なる家計簿データを作成できます。

 

フォント・罫線・印刷設定の自動整形

フォントはメイリオ、背景色は「白、背景1、黒＋基本色15%」、列幅は 7.3 に統一。
印刷設定は横向き・左右余白0・1ページに収まるように自動調整されます。

 

シート削除ボタンの作成

先ほどのシート削除ボタンについても解説します。

 

1月～12月のシートを一括削除するVBA

「シート削除」ボタンを押すと、1月～12月のシートをまとめて削除できます。
削除前には確認メッセージが表示されるため、誤操作を防げます。

 

 

「作成済み」フラグをリセットする仕組み

お題生成シートの A1 にある「作成済み」の文字を削除し、再生成できる状態に戻します。

 

採点機能の作り方

ご利用者が実際にシートを作った後、採点も自動化するようにします。

まずは標準モジュールに以下のコードも追記します。

 

シートに採点ボタンも配置し、ScoreUserマクロも登録します。

ご利用者が作業するシートは、家計簿シートを複製し、シート名を氏名にします。また、B1のセルを氏名として入力してもらい、C1のセルは家の家計簿と入力してください。

 

採点シートの作成

上記のように、採点シートを作成します。

ここまでの内容について解説します。

 

氏名チェック（B1セルとシート名の一致）

利用者シートの B1 に入力された氏名と、シート名が一致しているか確認します。
一致しない場合は採点をキャンセルし、誤採点を防ぎます。

 

お題シートと利用者シートの照合ロジック

収入1～貯蓄の項目を、1月～12月の各お題シートと照合します。
項目ごとに正しいセル番地をマッピングし、正確に比較できるようにしています。

 

間違い箇所を赤字太字にする方法

不一致だったセルは赤字＋太字に変更し、どこが間違っていたか一目で分かるようにします。

 

採点結果を採点シートへ自動記録する方法

正解数・ミス数を採点シートの B15～C24 に自動で記録します。
正解率や合計は数式で自動計算されます。

 

採点前にフォントをリセットする仕組み

採点前に、利用者シートのフォントを黒・通常サイズ・太字解除に戻します。
これにより、前回の採点結果が残らないようにできます。

 

全員分を一括採点する「全て採点」ボタン

以下のコードをコピペして追記しましょう。

全て採点ボタンに、ScoreAllUsersのマクロを登録します。

これまでのコードの意味は以下となります。

 

10人のシートを順番に探して採点するVBA

黒子 → 桜木 → 黒崎 → 夜神 → 江戸川 → 幕ノ内 → 磯野 → 緑谷 → 花垣 → 大空
の順番でシートを探し、存在すれば採点します。

 

採点マクロ（ScoreUser）との連携方法

ScoreAllUsers マクロ内で ScoreUser を呼び出すことで、既存の採点ロジックをそのまま使いながら一括採点を実現しています。

 

採点完了メッセージの表示

全員分の採点が終わると、完了メッセージが表示されます。支援員が採点状況を確認しやすくなります。

 

完成した訓練ツールの使い方

支援現場での運用例

利用者に家計簿入力をしてもらい、ストップウォッチで時間を計測しながら訓練を行います。
採点結果は支援記録にも活用できます。

 

利用者の習熟度に合わせた難易度調整

収入・支出の項目数を増やしたり、金額の幅を調整することで難易度を変えられます。

 

ストップウォッチと組み合わせた訓練方法

入力時間と正確性の両方を評価できるため、より実務に近い訓練が可能になります。

 

完成形のコード

ここまで何度も追記したりしたので、ストップウォッチから最後まで全てのコードの完成形を出します。

もしうまくいかない場合は、一旦下記のコードを全てコピペして標準モジュールに入れてみましょう。

 

 

まとめ：Excel × VBA は支援現場の強力な武器になる

全て採点したら結果が出たと思います。

今回作ったシステムの振り返り

家計簿入力のお題生成、採点、結果記録までを自動化することで、支援員の負担を大幅に減らしつつ、利用者の学習効果を高めることができます。

出来る限り職員の負担を減らし、効率化することで他の業務に時間をあてることができます。

 

次に作れる応用機能のアイデア

もし今後機能を追加しようと思ったら以下のものがあります。

• 採点結果の PDF 自動保存
• 年間成績表の自動生成
• Teams や Slack への自動通知
• 難易度別の家計簿テンプレート生成

Excel と VBA は、支援現場の課題を解決する強力なツールです。
ぜひ今回のシステムを活用して、より効果的な訓練環境を作ってみてください。