[[20130217155131]] 『日報のテンプレートを作成しています。  ページの最後に飛ぶ

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

 

『日報のテンプレートを作成しています。
1日1枚づつ、毎日使う用紙です。年月日と曜日が入力されたものを一気に1ヶ月分作りたいのです。
ページをコピーして31ページ作っています。年月日と曜日のセルにはどのように入力すれば良いでしょうか?
イメージとしては、あるセルに年月を入力すると、自動的にその月の分が一斉に出来上がるという感じです。
よろしくお願いします。XPでエクセル2010です』(チカパパ)


 A1に西暦年
 B1に月

 A2
 =DATE(A1,B1,1)

 A3
 =IF(MONTH(A2+1)=$B$1,A2+1,"")
 これをA32までフィルドラッグ。

 曜日は表示形式を変えるか、B2に
 =IF(A2="","",TEXT(A2,"aaa"))
 これをB32までフィル。
 BJ

 ああ、1日1枚ですか↓見て勘違いだと気づきました
 ↑は無視してください。
 10:39追加


 1日1シートですよね?
 まず、1から31までのシートを作ります。

 1枚1枚シート名を変えてもいいのですが、面倒ですので
 A1に日付と入れ、A2からA32までに1〜31と入れます。
 A1を選択し挿入→ピボットテーブルでレポートフィルタと値に日付をドラッグして配置します。
 ピボットテーブルツール→オプション→オプションのプルダウンからレポートフィルタページの表示を選択し
 日付でOK

 これで1〜31迄名前のついたシートが出来上がります。
 全シートを選択し、ピボットの範囲を選択し、ホーム→編集グループ→クリア→すべてクリア
 でピボットを消します。(いらないシートは削除しておいてください。)

 次に年月日を入れます。
 A1に年、B1に月、C1に日を入れる欄をとりあえず作ります。
 2のシートから31のシートを選択し、A1に='1'!A1と入れてB1までコピー
 次に全シートを選択し、C1のセルに=REPLACE(CELL("filename",A1),1,FIND("]",CELL("filename",A1)),"")
 と入力。(この時、新規ブックでどこにも保存していない場合はどこかへ一旦保存して下さい。)
 全シート選択の状態で、D1に=DATE(A1,B1,C1)と入力し表示形式を「aaa」とします。
 これで、1枚目のA1とB1に年と月を入れれば1ヶ月分のブックが完成すると思いますが如何でしょうか?

 小の月の場合はいらない日のシートは削除してください。
 C1が文字列として出てくるので左寄せで表示されますが気になるならそのあたりは体裁を整えて下さい。

 (コナミ)


コメント返信:

[ 一覧(最新更新順) ]


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