エクセルで楽々校務

学校現場で使えるエクセルファイルや小技の紹介をしています。掘り出し物があるかもしれません。あと、今までの実践での疑問点もつぶやきます。

【VBA】出席簿で欠席内訳を備考欄にまとめて記入する(Join関数)

出席簿を自動化する上で、備考欄の記入も自動でできるように検討してきました。

今回は、長欠の内訳を、Join関数を使って記入する方法を紹介します。

授業日数の1/3以上欠席した児童の氏名、理由、合計日数を備考欄に記入するシートを例として作ってみました。

 

f:id:exeladmin:20201108191633p:plain

病欠理由のカウントを入力して、左上のボタンを押すと、備考欄に記入されます。

サンプルシートを載せました。興味がある方はダウンロードして遊んでみてください。

---------------------------------------------------

【サンプルシート】

 

 

では、また(^^)/