[[20071008080308]] 『16日から翌月の15日までの万年カレンダーを作りた』(まんねん) >>BOT

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『16日から翌月の15日までの万年カレンダーを作りたいのですが分からないのでお願いします。』(まんねん)

 一日からのカレンダーを作ることは出来ますか?
 それに15日足すだけです。
 (可憐だ)

 最大31日分つくって、翌月の16日以降は表示しない
 などの調整は必要ですね。
 (可憐だ)

可憐だ様
おはようございます。
一日からのカレンダーは作ることは出来るのですが
15日足すことが分りません。(まんねん)

 1.「スタートの年月」指定は、どこ(セル位置)に、どのようなデータを入力
     することによって 行うお積もりですか?

 2.出力日付は、どこ(セル位置)に出力するのですか?

 (半平太)

 A1に日付があるとして
       [A]
[1] 2007/10/15
[2]=IF(OR(AND(MONTH(A1+1)<>MONTH($A$1),DAY(A1+1)>=16),A1=""),"",A1+1) A31まで↓フィル
[3]
(やす)

 やすさん、2月のエラー処理が必要のようですよ。
 (とおりすがり)

 >一日からのカレンダーは作ることは出来るのですが
 一日の日付はどのように出していますか?
 (可憐だ)

 (とおりすがり) さん >2月のエラー処理が必要のようですよ。
A1に2007/02/15で、できますが?
(やす)


 A1は2/16ですよ。
 (とおりすがり)

 A1が2/15の場合でも、A31はエラーになりますね。
 (とおりすがり)


 こうですかね。
 =IF(A1="","",IF(AND(MONTH(A1+1)<>MONTH($A$1),DAY(A1+1)>=16),"",A1+1))

 (川野鮎太郎)

 たとえば、当月の一日の日付は

 =DATE(YEAR(TODAY()),MONTH(TODAY()),1)
 で取得できます。
 16日の日付は同様に
 =DATE(YEAR(TODAY()),MONTH(TODAY()),16) 
 で取得できます。
 年、月、日の部分は、それぞれ式やセルで
 指定することも可能です。
 詳しくは関数のヘルプをご参照ください。

 日が16以上で、かつ、月が翌月のものは
 表示しない、という式になると思います。
 (可憐だ)

  >日が16以上で、かつ、月が翌月のものは
 >表示しない、という式になると思います。

 川野鮎太郎さんが既に回答されてましたね。
 失礼しました。
 (可憐だ)

 >  =IF($A$1+ROW(A1)>=DATE(YEAR($A$1),MONTH($A$1)+1,DAY($A$1)),"",$A$1+ROW(A1))

 2月及び 31日の無い月に非表示(16日以降)になるセルだけでいいのでは
 =$A$1+ROW(A1) 
 (Zマン)   


皆様有り難う御座います。
うまくいきません。(まんねん)

 (JJJJ)
[[20070617170302]]『万年カレンダーについて』(まんねん)
で解決との事 私はおります。


 以前にも同じような質問をされていたのですね。
以前ののは横方向に伸びているし、解決済みだし・・・
詳細を書くべきだと思いますが、いかがでしょう。
[[20070617170302]]『万年カレンダーについて』(まんねん)

 前のスレと同じような回答を書いていたようなので書いていたものは削除し、
私も退散します。 (Hatch)


 前スレにも書きましたが
 ○シート構成
 ○現在出来ている数式(1日始まりの式でも)
 ○どのセルになにが入っているのか(定数、数式ともに)
 教えてください。

 カレンダーは、横方向や縦方向 または
 一週間毎の物 等いろいろな物が存在して
 それぞれに関して式が変わってきます。

 まんねんさんが作りたいカレンダーの形式をまず公開する事。
 それから、何をやってどの様に上手く行かないのか説明する事。
 これらは最低限必要です。

 まんねんさんがどんなビジョンを持っているのか説明し
 どんな操作をしたのか、又その時期待しないどの様な表示になるのか。
 まんねんさんが見ている物をこちらにも見えるように説明して下さい。
 そうすれば、より実状にあったアドバイスがもらえると思いますよ。

 (HANA)


皆様有り難うございます。
[[20070617170302]]『万年カレンダーについて』(まんねん)
これを見たら同じ人がいたのですね(HANA)様のこの式を使ってみました。16日に
=IF(DATE($A$1,$A$2-1,15+COLUMN(A1))>=DATE($A$1,$A$2,16),"",DATE($A$1,$A$2-1,15+COLUMN(A1)))
を入れてみました。16から15までのカレンダーができるのですが、セルの位置を変えると16日が消えてしまいました。

    A    B     C    D    E    F    G     
1  2007 年  10    月
2
3 16   17    18    19   20  21  22  となるのですが、

    A    B     C    D      E    F    G     
1             2007 年   10    月
2
3         16    ( D3に16日をもつて来ると19日から始まってしまいます。)

    A    B     C    D    E    F    G     
1            2007   年 10   月
2
3                  19   20  21  22  となります。何か方法がありますか?(まんねん)


 違う方だったのですね、失礼しました。

 式の中の
 >COLUMN(A1)
 この部分は、「1」と言う数字を返しています。
 横にコピーすると「2」「3」「4」・・・
 と続いていく物で、A1セルの値を参照しているわけでは有りません。

 その他の「$A$1」や「$A$2」はそのセルの値を参照しています。

 D3に入っている式は、COLUMN(D1)となっていませんか?
 式中に2箇所出てきますので、両方とも「A1」に直してみて下さい。

 上手く行きそうですかね?

 (HANA)

HANA様
有難うございます。
COLUMN(A1)に直したら出来ました。
もうひとつ質問が有るのですが、
12か月分のカレンダーを作りたいのですが祝日などを入れる方法は有りますか?(まんねん)

 「まんねんさんが作りたいカレンダーの形式をまず公開する事。」

 12ヶ月分のどの様なカレンダーを作りたいのですか?
 また、祝日などをどこにどの様に入れたいのですか?
(「入れる」と言うと祝日名を表示したい?)
 どのセルに何を入力し、どのセルにどの様に表示されるカレンダーを希望ですか?

 E1セルの値を変えることによって、12ヶ月分のカレンダーを作るとき
 祝日が分かるようにしたい・・・と言う事ですかね?
 それとも、E1セルに「10」と入れたら
 3行目に10月分、4行目に11月分・・・と一年分が表示される物?
 先に載せて頂いた形式とはまた違う物?

 そうそう、文頭に半角スペースを入れると
 改行がそのまま表示できますよ。
_←この部分に半角スペースが入っています。

 (HANA)

HANA様

初めに作ったシートのE1を1から12
に変えて12か月分のシートを作り、
その月の祝日と日曜を条件付き書式で色を付けたいのですが
(まんねん)


 とりあえず↓の表を作成しましょう。
	[A]	          [B]
[1]	2008/01/01	元日
[2]	2008/01/14	成人の日
[3]	2008/02/11	建国記念の日
[4]	2008/03/20	春分の日
[5]	2008/04/29	昭和の日
[6]	2008/05/03	憲法記念日
[7]	2008/05/04	みどりの日
[8]	2008/05/05	こどもの日
[9]	2008/05/06	振替休日
[10]	2008/07/21	海の日
[11]	2008/09/15	敬老の日
[12]	2008/09/23	秋分の日
[13]	2008/10/13	体育の日
[14]	2008/11/03	文化の日
[15]	2008/11/23	勤労感謝の日
[16]	2008/11/24	振替休日
[17]	2008/12/23	天皇誕生日
後は↓参考
『土曜は青、日曜は赤にする方法』(じゅんこ)
[[20050705122054]]
(TT)


(TT)様

有難うございます。

丁寧に書いていただいたのですが

それを、一枚のシートで、万年カレンダーを

作りたいのですが、何か方法は有りませんか?

(まんねん)


 祝日は、結構頻繁に変わってしまいます。
 計算だけで求めるのが不可能とは言いませんが
 リストにして毎年更新するのが良いと思いますよ。

 ↑が私のスタンスとして
 >その月の祝日と日曜を条件付き書式で色を付けたい
 このご希望をかなえるためには 祝日リストが必要です。

 まんねんさんのご希望としては
「祝日リストを毎年更新する必要のない物」
 でしょうか?
 その場合、祝日を算出する計算式が必要になってきますが。

 (HANA)

HANA様

何度もすいません。
祝日リストを毎年更新する必要のないもの
が理想ですが、祝日シートを作って、そこから
カレンダーを動かすと12か月分のシートが同じように
動いてしまったので、何かあればお願いします。


 こんな感じになればいいのでしょうか。
http://skyblue123.hp.infoseek.co.jp/Excel/MyCalendar5.xls

 (川野鮎太郎)

 >祝日シートを作って、そこからカレンダーを動かすと12か月分のシートが同じように動いてしまったので
 どの様な操作をなさったのですか?
 12ヶ月分のシートって何でしょう?≪追記≫これは作成済みでしたね。
 カレンダーの何を動かしたのでしょう?
 どの様に動いたのでしょうか?

 もしかして、それぞれのシートの月情報を
 参照しているセルが、全て祝日シートの
 同じセル(月情報を入力したセル)になっている
 ・・・と言うこと?

 各シートの日付を計算する式は現在、どの様な物が入っていますか?

 (HANA) コメント追記しました。16:28


HANA様

説明が下手ですみません。
月情報を入力したセルです。
16には=マスタ!R2   
R2はマスタシートの祝日・休日テーブルの年月日の位置です。


 えっと・・・たぶんなさっていることが違います。
 月情報は、シートによって違うはずです。
 各シートのE1セルを参照して下さい。
(各シートのE1セルに そのシートが何月のシートなのか
 入っているのですよね?)
 どの月のカレンダーを表示するのかが、シートによって固定なら
 月情報は、直接式の中に書き込んでおいても良いと思いますが・・・。

 祝日セルに色を付けるのは、条件付き書式で行います。
 (TT)さんご呈示の祝日リストを新しいシートに配置し
 A1:A17を選択して「祝日」と言う名前を付けて下さい。
  挿入(I)→名前(N)→定義(D)
 例えば、1月のシートの
 D3セルの条件付き書式は
  数式が =COUNTIF(祝日,D$3) [ お好みの書式を設定 ]
 とします。

 カレンダーが2008年のもので有れば 上で設定した書式が
 適用されると思いますが、どうですか?

 (HANA)

 (川野鮎太郎)さん表参考で
罫線も条件付き書式(条件1で) でAE3〜AH3参照で できるのでは
  (JEI)


皆様有り難う御座います。

いろいろ教えて頂いたのですが説明が下手でなかなか難しくなってしまいました。
ファイルを見て頂けば一番いいのですがとりあえず
祝日とカレンダーのシートで万年カレンダーを作成してみたのですが
祝日.1.2.3.4.5.6.7.8.9.10.11.12のシートで年だけを変えて使っていく
方法が有ればいいのですが。1.2.3.4.5.6.7.8.9.10.11.12はすべて同じ
シートです。(まんねん)


 現在のシートの状態を、こちらで再現出来るように
 説明して見てもらえますか?
 どのセルに何が入っているのか。

 「祝日」と言うシートには何処に何が入っていますか?
 A1セルから、TTさんの御提示の表が入っていますか?

 カレンダーの方は、1月のシートについて話しを進めましょう。
 これは、先に御提示の構成と同じですか?
 つまり、
   C1セルに年情報
   E1セルに月情報として「1」
   D3セルから横方向に日付の式で
   その式は、D3セルに
=IF(DATE($C$1,$E$2-1,15+COLUMN(A1))>=DATE($C$1,$E$2,16),"",DATE($C$1,$E$2-1,15+COLUMN(A1)))
   が入っており、横方向へ31列分コピーしてある。

 現在の状況は上記で相違ありませんか?
 同じで有る場合は、そこからどうしたいのか。
 違う場合は、何処が違うのか教えて下さい。

 (HANA)

(HANA)様
本当に何度も何度もすみません。
いろいろなカレンダーの作成の仕方
見ていて休日、祝日があるカレンダー
見つけました。

http://www.eva.hi-ho.ne.jp/ohtake/excel/calender2.htm

このカレンダーを利用してみます。いじってみたら始まりの
変更も変えられるみたいなので、これは、休日、祝日シート
から年月を変えるみたいですが、わたしは、年、月、日、をばらばらにして、カレンダーから年、月を
かえるようにしてみました。それで、シートを休日、カレンダーはコピーして1,2,3,4,5,6,7,8,9,
10,11,12にして、ずっと使うので年だけを変えるとカレンダーが動くようにしたいのですが
休日シートをカレンダー一枚一枚にリンクする方法はありますか?
質問が変わってしまい申し訳ありません。(まんねん)


 現在のシートの状態を、こちらで再現出来るように
 説明して見てもらえますか?
 どのセルに何が入っているのか。

 >年、月、日、をばらばらにして、カレンダーから年、月をかえるようにしてみました。
 「カレンダー」と言うのは、カレンダーシートの事ですよね?
 何故休日シートを各カレンダーシートにリンクさせる必要があるのか分かりません。

 >ずっと使うので年だけを変えると
 シート毎に年を変えると言うことですか?

 何度も申し上げておりますが
 現在まんねんさんがご覧のシートが、どの様な状況になっているのか
 お知らせ下さい。

 (HANA)

(HANA)様
おはようございます。

休日シートのB2に=DATE(カレンダ!ーB2,カレンダー!E2-1,C2)
カレンダーシートのB2に年E2に月
16(D7)のセルに=休日!B2 17(E7)は=D7+1と18日以降はコピー

シートは休日、カレンダー、1,2,3,4,5,6,7,8,9,10,11,12
(まんねん)


 えっと・・・現在はその「カレンダー」シートを
 12枚コピーして、シート名を変更したのですか?
 そうで有ればカレンダーシートに表示されているのと同じ
 年月のカレンダーが12枚出来るのは当然だと思いますが・・・。
(カレンダーシートの値を変更すると全て同じカレンダーになる。)

 なぜ
 >COLUMN(A1)に直したら出来ました。
 この時に出来た方法ではなく、現在の方法をとって居られるのですか?

 今は12枚分のカレンダーを作る段階なのですよね?
(祝日に色を塗る段階ではなく)
 上までで完成している
>=IF(DATE($C$1,$E$2-1,15+COLUMN(A1))>=DATE($C$1,$E$2,16),"",DATE($C$1,$E$2-1,15+COLUMN(A1)))
 この式の入ったシートを12枚分コピーして、各シート毎にE2の値とシート名を変更するのでは
 何の問題が有るのですか?
 それが分かれば、まんねんさんのなさろうとしていることが分かるのかもしれません。

 (HANA)

 >=IF(DATE($C$1,$E$2-1,15+COLUMN(A1))>=DATE($C$1,$E$2,16),"",DATE($C$1,$E$2-1,15+COLUMN(A1)))
D3 =DATE(C1,E1,16)	
E3 =IF(D3="","",D3+1)           右へフィールコピー	AE3まで
AF3 =IF(AE3="","",IF(DAY(Q3)<4,"",AE3+1))	右へフィールコピー	AH3まで

HANA様

=IF(DATE($C$1,$E$2-1,15+COLUMN(A1))>=DATE($C$1,$E$2,16),"",DATE($C$1,$E$2-1,15+COLUMN(A1)))
などの式は使わずにカレンダーと休日シートを使ったカレンダーで作成しているので休日シートにすべて
データーが有ります。カレンダーシートは動きますが、シート1,2,3,4,5,6,7,8,9,10,11,12のシートは
動きません、シート1,2,3,4,5,6,7,8,9,10,11,12に休日シートをリンクする方法があればいいのですが

休日シートのB2に=DATE(カレンダ!ーB2,カレンダー!E2-1,C2) カレンダーシートのB2に年E2に月 16(D7)のセルに=休日!B2 17(E7)は=D7+1と18日以降はコピー
シートは休日、カレンダー、1,2,3,4,5,6,7,8,9,10,11,12 (まんねん)


 再度載せますが
 >この式の入ったシートを12枚分コピーして、各シート毎にE2の値とシート名を変更するのでは
 >何の問題が有るのですか?

 また、質問ですが
 >休日シートにすべてデーターが有ります。
 12ヶ月分のカレンダーが休日シートには表示されている
 と言うことですか?
(休日シートには「B2に=DATE(カレンダ!ーB2,カレンダー!E2-1,C2)」が入っている
 と言う御申告ですが。)
 「全てデータがある」とは具体的にどの様なデータが有るのですか?

 「最終的にはどの様なブックが作りたいのか」
 この部分のビジョンが、私とまんねんさんとで相違が有るのかもしれません。
 一応言ってみますが、私の想定としては
  休日シートと各月のシート計13枚。(これで事が足りるので。)
  各月のシートは、それぞれシート毎に何年のカレンダーを表示するのか指定する。
  各月のシートで、日祝日は、セルに色が付く。
 と言うものです。

 これが違うのですかね?

 (HANA)


 横から失礼致します。
まんねんさんの言っておられる「万年カレンダー」という言葉が
どうも気にかかるのですが・・・

 HANAさんはじめ、みなさんが提示されているのは
一般的な(?)カレンダーの作成方法のように思えますが
まんねんさんが作りたいのは「万年カレンダー」?
初めは、作るカレンダーシートは1枚のみで
上書きで使い回ししていきたいのかと思っていたのですが・・・。

 「全く見当違いのことを言っている」とか
「もう今では方向転換している」とか言うことでしたら、
スルーして下さい。

 (ぽっち)

HANA様

休日シートと各月のシート計13枚
休日シートには  http://www.eva.hi-ho.ne.jp/ohtake/excel/calender2.htm
このカレンダーの祝日、休日が有ります。
このデータを基に1〜12枚のカレンダーを別々に動かしたいのですが。
1のシートでも3月のカレンダーが開くようにしたいのです。
お願いします。(まんねん)


 >休日シートにすべてデーターが有ります。
 は、「祝日のデータが、そろっている」と言う事ですね。
 でもって、数式で自動的に計算されるのですよね。

 >1のシートでも3月のカレンダーが開くようにしたいのです。
 これは、どういうことですか?
(1のシート には何が入力されるのですか?)

 >このデータを基に1〜12枚のカレンダーを別々に動かしたい
 「別々に」とは、具体的にどういったことですか?
 例えば、1月シートは2008年を表示し、12月シートは2007年を表示する
 とか言うことですかね?
 そうで有れば、その指定はどのシートで行いたいのですか?
 各シートで行うなら、安全のため祝日のデータを各シートに
 持つのがよいと思いますが・・・。(それでも良いのかな?)

 (HANA)
 ----
HANA様

 各シートで行うなら、安全のため祝日のデータを各シートに
 持つのがよいと思いますが・・・。(それでも良いのかな?)
それでやってみますのでお願いします。(まんねん)


 リストシート作成で祝日のデータを名前定義すれば
(HANAHANA失礼)


HANAHANA失礼様

やり方が分からないので教えてください。
(まんねん)


 HANAHANA失礼さん。
 シートによって年を変えたい様ですので、シートによって
 休みの日は変わりますが、その点大丈夫ですか?

 まんねんさん。
 シート毎に月は固定なのですから
 各シートに関係する休みだけを
 各シートで計算すればよいですね。
(でも、面倒なので、2ヶ月分くらい。笑)

 どのセルが空いていますか?

 (HANA)

HANA様
カレンダーと入力するセル以外なら空いているので
行で150よりしたです。(まんねん)

 それでは、なるべく簡単な式で済む様に
 要所セルにはそれぞれ数式を入れることにします。

 想定するものは、
  1.シートによって月は固定。年はそれぞれ変更可
  2.該当月に関係する祝日はそのシートで算出
   (関係する祝日は、先月と今月のもの)
  3.2で作った祝日リストに基づいて、祝日のセルに色を付ける。
 各シートを作成するにあたり、注意する点は
  1.「1月」シートの祝日は 前年の12月〜当年の1月分が必要
  2.「3月」シートの最終セルは、年によって変動する
 ・・・と言った所でしょうか。

 取り敢えず、1月のカレンダーを作る方法です。
 1月分の祝日リストは作成出来ますよね?
 年情報はB2セルに入力すると言う事ですので
 天皇誕生日(A150)は=DATE($B$2-1,12,23)(去年の12月23日)になります。
 振替休日(A151)は=IF(WEEKDAY(A150)=1,A150+1,"")になります。
 元旦と、その振替休日・成人の日 それぞれ式を入れて下さい。

 16日を表示するのは、D7ですので D7セルに
=DATE(B2-1,12,16)
 として下さい。これで、去年の12月16日の日付が入力されます。
 E7セル以降は
=D7+1
 前の日付を参照して+1して下さい。
 12月は31日まで有りますので、31日分横へコピーします。

 祝日セルに色を付けるのは(D7セルに関して)
 条件付き書式の条件として
  条件1 数式が =COUNTIF($A$150:$A$154,D$7) [ 祝日用書式   ]
   条件2 数式が =WEEKDAY(D$7)=1         [ 日曜日用書式 ]
  条件3 数式が =WEEKDAY(D$7)=7         [ 土曜日用書式 ]
 これらを設定して、この書式を31日分横へコピーして下さい。

 これで、1月のシートは完成です。
 B2の値を「2006」にしたとき、1/2のセルが振替休日として色が付くか確認して下さい。

 3月のシートに関しては、年によって28日と29日の時がありますので
 29日目のセルの数式(AF7)は
=IF(DAY(AE7)=15,"",AE7+1)
 として下さい。

 30日しか無い月は、30日分の数式と条件付き書式を設定。
 31日ある月は、31日分の数式と条件付き書式を設定。
 勿論、シートによって必要な祝日の日数は違うと思いますので
 条件付き書式の参照範囲は適宜変更して下さい。

 上手く行きそうですか?

 (HANA)

HANA様
有難うございます。やってみます。
(まんねん)

コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.