
現在、Excelで縦型の予定表を作成中です。
基本的な日にちや曜日、祝日等までは、自動で入力できるようなフォーマットを作りました。
このフォーマットで第1、3月曜日に休日と自動入力したいのですが、ほかの方の質問などを参考にいろいろと試してみましたが、うまくいきません。
また、第1,3月曜日が祝日と重なった場合、翌火曜日に休日と入力させたいです。
(例:B8セルに休日、B16セルに休日)
※B列には下記の数式を入れ祝日が自動で入力されるようになっています。
=IF(ISERROR(MATCH(A2,祝日,0)),"",INDEX(祝日名,MATCH(A2,祝日,0)))
この数式と合わせて上記内容のような自動入力の数式を入れることはできますか?
教えてください。お願いします。

A 回答 (6件)
- 最新から表示
- 回答順に表示

No.5
- 回答日時:
マクロ音痴な私が作成したカレンダーのイメージを、単なる参考として、添付図として供します。
スペースの制約のため、2019年1月~5月だけに、かつ、月の列も省略しています。
新天皇即位による11連休の様子も伺えるかと。


No.4
- 回答日時:
》 第1,3月曜日が祝日と重なった場合、翌火曜日に休日と入力させたいです
2019年5月の第1月曜はジャンボ大型連休の最終日だけど、貴方ハンとこは11連休に[
させ」ちゃうンですね!ギネスブックもの!凄い!太っ腹ぁ~!(パチ、パチ、…)
No.3
- 回答日時:
No.2です。
前回は勘違いしていました。
第一・第三月曜を「休日」そして、その月曜が祝日ならば次の火曜を「休日」としなければならなかったのですね。
前回の配置通りとします。
B2セルの数式だけを変更してください。
すこし長くなりますが、
=IF(A2="","",IF(COUNTIF(Sheet2!$B:$B,A2),INDEX(Sheet2!$A:$A,MATCH(A2,Sheet2!$B:$B,0)),IF(OR(A2=A$2-1-WEEKDAY(A$2-1,3)+7,A2=A$2-1-WEEKDAY(A$2-1,3)+21),"休日",IF(WEEKDAY(A2)=3,IF(((DAY(A2)-1>=1)*(DAY(A2)-1<=7))+((DAY(A2)-1>=15)*(DAY(A2)-1<=21)),IF(COUNTIF(Sheet2!$B:$B,A1),"休日",""),""),""))))
にしてみてください。m(_ _)m
No.2
- 回答日時:
こんばんは!
>自動で入力できるようなフォーマットを作りました。
どのような形でお作りになったのかが不明なので、勝手にこちらでやってみました。
↓の画像のような配置でSheet2に祝日データを作成しておきます。
(Sheet2には名前の定義の設定はしていません)
いずれにしてもシリアル値で扱った方が簡単なので、すべてシリアル値になるようにしています。
B1 → セルの表示形式のユーザー定義から 0年 として 2019 の数値のみを入力。
C1 → セルの表示形式のユーザー定義から 0月 として 1 のみを入力。
A2 → セルの表示形式のユーザー定義から d(aaa) としています。
まずA2セルの数式を
=IF(MONTH(DATE(B$1,C$1,ROW(A1)))=C$1,DATE(B$1,C$1,ROW(A1)),"")
として月末(31日)のA32セルまでフィル&コピー!
B2セルに
=IF(A2="","",IF(COUNTIF(Sheet2!$B:$B,A2),INDEX(Sheet2!$A:$A,MATCH(A2,Sheet2!$B:$B,0)),IF(OR(A1=A$2-1-WEEKDAY(A$2-1,3)+7,A1=A$2-1-WEEKDAY(A$2-1,3)+21),IF(COUNTIF(Sheet2!$B:$B,A1),"休日",""),"")))
という数式を入れ、こちらもB32セルまでフィル&コピー!
これでとりあえずはお望みの表示になると思います。
後はA1~C32セルを範囲指定 → C列境界部分で上下左右の小さな矢印になるところにマウスポインタを移動させ
Ctrlキーを押しながら右へ3列ずつドラッグ!
これでA~C列がそのままD~F列に、G~I列に・・・とコピーできます。
最後に各列1行目の「月」の数値を入れ替えるだけでその月に対応できるはずです。
※ あるかどうかわかりませんが・・・
仮に第一・第三月曜の翌日火曜日が「祝日」の場合、水曜日を「休日」にしなくてよいのですかね?
そこまで考慮すると相当長い数式になってしまいますね。m(_ _)m

No.1
- 回答日時:
考え方を示すだけで自己解決できそうなので、アドバイス。
・・・
1日から7日の間なら第一月曜日。
15日から21日の間なら第三月曜日。
ということで、
1日から7日に月曜日かを判断させる数式、
15日から21日にも月曜日かを判断させる数式、
をそれぞれ入れて、月曜日なら「第一月曜日」「第三月曜日」を表示させるような数式を作りましょう。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
エクセルで毎月第2週日の水曜日に〇が表示される 関数の組み合わせを教えてくれませんか? 毎週水曜日な
Excel(エクセル)
-
第一、第三、土曜日のセルに条件付書式設定で色を付けたいのですが、そのよ
Excel(エクセル)
-
エクセルで曜日に応じた文字を自動で入力したい
その他(Microsoft Office)
-
-
4
Excel2010第二、第四土曜日に〇印を
その他(Microsoft Office)
-
5
エクセルで第2、第4土曜日を抽出する方法
Excel(エクセル)
-
6
エクセルの数式で第三水曜日に色を付ける
Excel(エクセル)
-
7
日付を入力しカレンダーの該当する日に印をつけたい
Excel(エクセル)
-
8
暦で第一第三の土曜日を 休日出勤 と表示するには
Excel(エクセル)
-
9
Excelで第一〇曜日を求める方法がわかりません
Windows 7
-
10
excelで第二月曜日を返す、ただし祝日の場合はその次の日
Excel(エクセル)
-
11
エクセルで作ったカレンダーの一日のセルに複数の予定を入れ、どんな種類の
その他(Microsoft Office)
-
12
入力日より、その月(もしくは翌月)の第2水曜を求めるには?
Excel(エクセル)
-
13
Excelで指定の曜日の日付を表示する。
Excel(エクセル)
-
14
カレンダーを作成し、特定の日付の上に丸印をつける方法はありますか。
その他(暮らし・生活・行事)
-
15
エクセルで作成したカレンダーに「当番の名前」を自動的に入力する方法をお
その他(Microsoft Office)
-
16
Excel【利用予定表】から、【曜日別利用者リスト】を作成
Excel(エクセル)
-
17
あるセルに特定の文字列を打つと、他のセルに決められた文字が自動入力するように
Excel(エクセル)
-
18
今日の日付が第n曜日かを求める
その他(Microsoft Office)
-
19
excelで第二金曜日を…
Excel(エクセル)
-
20
【Excel】カレンダーの毎月の第1日曜日だけに文字を入れる方法について
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【マクロ画像あり】❶1つの条件...
-
【マクロ】既存ファイルの名前...
-
【マクロ】【画像あり】❶ブック...
-
【マクロ】【画像あり】ファイ...
-
Dir関数のDo Whileステートメン...
-
5単位で繰り上げしたい
-
【マクロ】【画像あり】4つの...
-
【画像あり】オートフィルター...
-
Excelで4択問題を作成したい
-
【マクロ】【画像あり】4つの...
-
エクセルのVBAで集計をしたい
-
エクセルの複雑なシフト表から...
-
【マクロ】数式を入力したい。...
-
【マクロ】元データと同じお客...
-
【マクロ】左のブックと右のブ...
-
【マクロ】実行時エラー '424':...
-
Office2021のエクセルで米国株...
-
エクセルのリストについて
-
【マクロ】【相談】Excelブック...
-
セルにぴったし写真を挿入
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
【マクロ】元データと同じお客...
-
エクセルの関数について
-
【画像あり】オートフィルター...
-
エクセルのVBAで集計をしたい
-
エクセルのリストについて
-
【マクロ】数式を入力したい。...
-
【マクロ】【相談】Excelブック...
-
Office2021のエクセルで米国株...
-
【マクロ】実行時エラー '424':...
-
他のシートの検索
-
エクセルの複雑なシフト表から...
-
【マクロ】【配列】3つのシー...
-
vba テキストボックスとリフト...
-
【マクロ】左のブックと右のブ...
-
【マクロ】変数に入れるコード...
-
エクセルシートの見出しの文字...
-
【マクロ】別ファイルへマクロ...
-
【関数】同じ関数なのに、エラ...
-
Amazonでマイクロソフトオフィ...
-
ページが変なふうに切れる
おすすめ情報