エクセル設定
お久しぶりです。 成績処理で忙しい季節ですね。 さて、今回は、dictionaryについてです。 ある程度VBAを使いこなせてくると、値を一気に転記できるdictionaryを 使いたくなりますね。 一般には、一意のkeyに紐づけされたitemを転記できるわけですが、 1…
出席簿の備考欄も自動入力できるようにして、電子出席簿はほぼ完成したのですが、勤務校では保健日誌ともデータ照合して数字に根拠を持たせるようにしています。 「出欠整合性チェックブック」を作って、各クラスの出席簿と保健日誌の出欠状況数のリンクをコ…
明けましておめでとうございます さて、新年最初のネタは、複数シートをFor Each~でループしながら、 印刷プレビューや印刷範囲を設定する時に実質的に高速に回すことができるコードの紹介です。 ネットを検索すると、定番の Application.ScreenUpdating = …
データ最終行を取得するVBAコードは、 Cells(Rows.Count, 1).End(xlUp).Row が定番ですが、任意の範囲内なら、For each nextを使って最終行を取得した方が手軽にできそうな気がしてコードを書いてみました。 【使い道】 出席簿備考欄の記述で、「新型コロナ…
出席簿を自動化する上で、備考欄の記入も自動でできるように検討してきました。 今回は、長欠の内訳を、Join関数を使って記入する方法を紹介します。 授業日数の1/3以上欠席した児童の氏名、理由、合計日数を備考欄に記入するシートを例として作ってみま…
【11月6日更新】コードが不完全だったので修正しました。 FindとFindNextを使うと、検索値に該当するデータを列挙することができます。 indexやmatchを使うと検索最初のデータは拾えますが、該当値が複数あるときは、 ダメですね。 ネットを探してみると…
前回、ご紹介したシートですが、男女別にも組めるように改良しました。 編成条件を選択してボタンを押すと並び替えます。 前回記事に使い方は書いています。↓ ↓サンプルシートです。(男女交互・男女別編成版) 下黒帯の右から4番目のアイコンがダウンロー…
疾走タイム順に、3クラスを6人ずつ、男女交互組で組編成ができます。 ネットを探しても案外なかったので作ってみました。 もしかして、数式で作るのが普通なのかもしれませんが、 私はリンクを貼りまくったり、セルを押したら長い数式が出てくるのはあまり…
ここまで作ってくると、自動でコマ割りができるようにしたくなりました。 が、全て自動は無理でした。理科は1時間ー2時間で組んでいるので、少し不規則です。ですが、このことを利用して、理科を決めて、ある程度コマを埋めると、 チェックと重複コマ移動ま…
半自動版が最新です。 ---------------------------------------------- 結論から言うと、機能を増強しました。 ①同時間コマの重複を、同画面でチェックできるようにしました。 ②空き時間の教員名を表示できるようにしました。 最後に評価版のZIPファイルが…
時間割編成等で、AB週混合で時間割表を作成した場合に役に立ちそうです。 範囲が飛び飛びだと、worksheetfunction.countif(範囲,検索値)>1 はうまく動作しません。 またfindは補助記述が多くてあまり使いたくありません。 発想を変えて、for nextループ内…
データ開始行を手動で設定できるように改良しました。 まるまま合体させたり、見出しは1回だけであとはデータ行だけ合体させたり、単一ブックの複数シートを合体させたりと、ほとんどの場合に対応できるようにしました。 研究会の参加者名簿の取りまとめで…
運動会特別時間割作成シートで使った手法です。 凡例を作り、同じように塗りつぶしをかければ、RGB等でコードを書く必要がなく、色も自由に変えられます。 【コード】標準モジュール Sub 塗りつぶしフォントカラー凡例コピー() Dim rng, rngR As RangeDim…
現在も稼働しているe週案。2年ほど前から使ってきて、先生方の声も取り入れて機能追加を行ってきました。今回は、指導内容を読み込む機能を別ファイルにコピーできるようにしました。 例えば、昨年度6年担任だった先生の指導内容を読み込んだり、過去の自…
【更新情報】 10/3 外国語教室の重複チェックの不完全な部分を改善しました。 任意のコマで2学年合同練習を選べるようにしました。●を選択します。 赤塗り白文字から黒文字に戻すように修正しました。 運動会のシーズンがやってきますね。15年くらい前に…
自校で使ってみると、なんやこれ!!!って大好評だったので、 少し改良しました。通信簿や会計ブックなどにモジュールコピーすると、 即使えます。コピーもダイアログ型に改良しました。 改良点は、 全てのシートの1行目に「目次に戻る」というリンクを張…
【9月3日更新】 リセット時に、男女以外の数字、文字を全部消せるようにVBAコードを修正しました。記事最後に載せているサンプルファイルも修正しました。 普通教室と特別教室のパターンを選択できるようにしました。 男女枠を設定してボタンを押すだけ。…
【最新版】 モジュールコピーをダイアログでできるように改良 この目次自動作成シートは、既存のブックの全シートに「戻る」リンクを張れます。 モジュールをコピーできるので、他のエクセルブックでも使えます。通信簿用に作ってみました。使えるかな・・・…
マクロでやろうと思っていたんですが、条件付き書式でできたので、備忘録しておきます。 やりたかったことは、1-1なら青、1-2なら黄色というように、入力するD1セルの方を、所属の色で塗りつぶすことでした。
そろそろ夏休みが終わってしまいます。 今まで作ってきたファイルを紹介したり載せたりしてきましたが、半分は備忘録です。もし、勤務校が変わっても、説明付きですぐに使えるようにしておきたかったからです。 今回は、縦割り班名簿作成を通じて、名簿の流…
この名簿ファイルの完成版です。 一旦作った名簿を別々に削除できるようにしました。転入生が入ってきた場合にも対応できます。データは原簿にあるので、何回でも名簿をワンタッチで作り直せます。 これは、我ながら使えると思います(^-^;
ご要望があり、抽出フィルターの名前を変えなくてもよいように改良しました。 ほぼ自動で作成できるクラブ・委員会名簿です。ちょっと使えるかもしれません。必ず1ページに収めて印刷できます(^^♪ 【目次】 ①原簿シートに氏名、クラブ、委員会を入力するか…
前回のシートに修正を加えて、リンク一覧の表示列をセルに書いた列に移動できるようにしてみました。実はこれ、ひな形の印刷範囲もコピーされるのでむっちゃ楽なんです。 前回の記事はこちら で、今回の画面はこちら
曜日ごとにデータを見たい時に、年月日からリンクして曜日の列を作って表を作成するときありますよね。 結論を言うと、セルの書式設定で表示形式を(aaa)に変えただけでは反映しません。
【目次】 ①開発タブを作る。 ②シートモジュールの書き方 ③標準モジュールの書き方 ④ブックモジュール(ThisWorkbook)の書き方 ⑤マクロを、ボタンに登録して実行する。
令和2年度から指導要録の評価観点が3つに減りました。 それに合わせて、これまでの成績処理システムを作り替えて、 自動処理できるようにしました。 【目次】 ①「■★スタートページ■全一覧表」を開く。 ②シートタブ「名簿設定」をクリックして初期情報を設…
こんばんは 週案を紹介する前に、エクセルの設定やマクロについて少し書いておきたいと思います。 今回は保存形式です。 何もしなければ、最近のエクセルは、拡張子 「.xlsx 」で保存されるはずです。しかし、これが曲者で、 将来的に、マクロを組んで組み込…
はじめまして。オリオンと申します。 学校現場で使えるエクセルファイルや小技を紹介していきたいと思います。 私自身のこれまでの業務実績をここで整理したいとも考えています。どうぞよろしくお願いします。 まず、学校現場でエクセルを使う場合、書籍やネ…