[[20020803223950]] 『表のA列に日付を自動入力』(力) ページの最後に飛ぶ

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

 

『表のA列に日付を自動入力』(力)

1ワークシートに複数箇所の日計表のホーマット作成で、A列に縦に日付を

入力させたいのですが。大の月[3,5,7,8,10月(31日)]

           小の月[2,4,6,9,11月(30日)]と

           特殊月[12月(27日)]

               [1月(35日)]

 月数を入力すると自動的にその月の日付が表のA列の5以降のセルに自動的

 に入る方法を教えてください。


 A3に2002と年を入力

A4セルを選択しデータメニューの【入力規則】で「入力値の種類」をリストとし

「元の値」に1,2,3,4,5,6,7,8,9,10,11,12 と入力します。

A4セルで右クリックメニュー【セルの書式設定】【表示形式】「ユーザー定義」で G/標準"月" とします。

A4で1月〜12月のリスト選択が出来るようになります。

A5セルに =IF($A$4=1,DATE(A3,A4-1,28),DATE(A3,A4,1))

A6セルに =A5+1 この式をA31までコピーします。

A32セルに =IF($A$4=12,"",A31+1)

A33セルに =IF(A32="","",IF(MONTH(A32+1)>$A$4,"",A32+1)) この式をA39までコピーします。

A5:A39を選択し、右クリックメニュー【セルの書式設定】【表示形式】「ユーザー定義」で d"日("aaa")" とします。

これでA4の月選択すれば自動的に日付と曜日が表示されます。

ただし、1月には先月の28日から表示して、特殊月[1月(35日)]の意味と解釈しました。

 (シニア)

シニアさんありがとうございました。意図していたとおりの結果が得られました。

感謝いたします。(力)

厚かましいのですが、別の日計表があります。この期間が毎月の16日から翌月の15日の場合ですが、教えていただいた式を元にやってみましたがうまくいきません。

A5セルのIF($A$4=1は論理式 

 DATE(A3,A4-1,28)真の場合 

 

 DATE(A3,A4,1)偽の場合この意味がよく理解できません。

$A$4=1はA4の月の1日(最初の日)意味でしょうか、

またDATE(A3,A4-1,28)は12/28を意味しますか、

DATE(A3,A4,1)は特殊月以外の月を意味しますか。

また「ユーザー定義」の(”aaa”)は何の意味でしょうかおしえてください。


  =IF($A$4=1,DATE(A3,A4-1,28),DATE(A3,A4,1))

A3が年、A4が月ですから特殊月の1月のための条件式です。

「もしA4が1月ならば、先月の28日にし、それ以外の月はその月の1日にしなさい」の意味です。

「ユーザー定義」の(”aaa”)は何の意味でしょうか?

d"日(”aaa”)" はその日の曜日を(月)、(火)、(水)・・・日付に曜日も同時に表示させる書式設定です。

d"日(”aaaa”)" とすれば、(月曜日)、(火曜日)、(水曜日)・・・と表示されます。

d"日(”ddd”)" はその日の曜日を(Mon)、(Tue)、(Wed)・・・日付に曜日も同時に表示させる書式設定です。

d"日(”dddd”)" とすれば、(Monday)、(Tuesday)、(Wednesday)・・・と表示されます。

この期間が毎月の16日から翌月の15日の場合ですが

A5に =DATE($A$3,A4,16)

A6に =A5+1 と入力しA32までコピーします。

A33に =IF(B32=DATE(A$3,A$4+1,15),"",B32+1) 入力し、A35までコピーします。

A5:A35を選択し、右クリックメニュー【セルの書式設定】【表示形式】「ユーザー定義」で m/d"("aaa")" とします。

A4を8月にすれば、A5は 8/16(金)と表示されます。

 (シニア)

シニヤさんありがとうございました。

見事に出来ました感謝します。

大の月はこのままでよいのですが、小の月にすると最後に

16日まで入ります、小の月だけ16日を表示させないようにす

るにはどうしたらよろしいでしょうか。

度々で申し訳ありませんが、よろしくお願いいたします。


 A33に  =IF(A32="","",IF(A32=DATE(A$3,A$4+1,15),"",A32+1)) 入力し、

この式をA35までコピーして下さい。

各月共16日から15日になる筈です。

 (シニア

シニアさん 出かけていて、御礼おくれました。

おかげさまで完璧にできました。ありがとうございました。

今後もご教示お願いいたします。


コメント返信:

[ 一覧(最新更新順) ]


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