見出し画像

ExcelVBA 看護.介護施設向け.1年間の(1月~12月)までのカレンダー日付を自動で表示出来る勤務表ファイル!

💙このExcelファイル無料で差し上げます。

★動画配信解説は➡7月4~5日予定!


▼来月の勤務表を組む場合や、指定した月に組む場合でも、実行ボタンを12ヶ月分作ってあるのでとても便利です。

▼日時と曜日もカレンダー日付通りで、土日の色づけと、日曜と月曜の間に罫線で区分してあるので、とても適しています。

▼勤務表はsheet(1)で、sheet(2)に予定勤務を組んでもらえるようにしてあるので、copyからsheet(1)に貼り付けます。

▼右と下にある勤務項目数(関数)は、勤務の実行ボタンから~自動表示します。



1~12月の実行ボタン & 勤務copy

▲上図の実行ボタンから指定した<月>を選択して、
その月のカレンダー日付を表示させます。
~ ~「月・日・曜日・色」が自動表示!


月と日時のVBAコード

▲上図から日付表示は、NumberFormatLocalで・・・・・・「表示形式を日付」にしています。

▲Do until~Loopステートメントから、
1日~31日まで繰り返し処理をします。




sheet(2)~sheet(1)に「crrent Region.Rows.Column」で転記

▲上図から「Crrent Region」で範囲を選択しますが、勤務以外のセルがはみでるので、「Rors.Column」プロパティで、指定した(行.列)をSelectからcopyまで~貼り付け(値のみ)します。


▼このファイルについて

1.このファイルは「マクロ有効ブックxlsm」で保存してあります。
2.ダウンロード後は ↓
右クリック~プロパティ、
全般~右下のセキュリティ、許可するにチエックからOKボタン。

▼ダウンロード前に必ず読んでください。

ご利用についての注意事項

  • 本ファイルは自由にご利用いただけますが、著作権等の一切の権利は、弊社に帰属します。

  • 本ファイルの使用・使用不能に伴ういかなる問題【損害・訴訟原因】について、当社はその責任を一切負いません。ご提供の内容における正確性・信頼性についてはお客様ご自身の責任においてご利用ください。

  • 本ファイルに関するお問合せについてはお答えできませんので、あらかじめご了承ください。

  • 本ファイルは編集してアップロード行為は禁止します。

👇
💙ここからダウンロード

いいなと思ったら応援しよう!