excelでのタスク表の期限設定に関して

質問

お世話になります。質問させていただきます。

現在、エクセルにてタスク表を作成しています。

シート１に（コンマはセル区切りを意味しています）

「タスク表」
Ａ,Ｂ,Ｃ
期限,タスク,状況
1/12,『包括マクロ経済』読破,未処理
1/12,佐藤さんへお礼状,完了
1/12,免許更新,未処理
1/13,リンスを購入,未処理
1/13,シャンプーを購入,完了
1/13,田中家へ挨拶に行く,未処理
1/14,木村家に電話,未処理
1/14,論文のテーマ決め,未処理
1/15,新年会の店予約,未処理
　　　　　　・
　　　　　　・
　　　　　　・
　　　　　　・

と記入されているのを、シート２に
期限が"3日以内に迫って"いて"未処理"の項目を"全て"自動表示させたいのですが、どのようにすればよいでしょうか？

例（シート２、本日を1/10とする）

「タスク期限近い項目表」
Ａ,Ｂ,Ｃ
1/12,『包括マクロ経済』読破,未処理
1/12,免許更新,未処理
1/13,リンスを購入,未処理
1/13,田中家へ挨拶に行く,未処理

稚拙な説明にて恐縮です。
お詳しい方がおられましたら、アドバイスお願い申し上げます。
なお、関数、ＶＢＡともに初心者ですが、かろうじてスクリプト（プログラム）を解読することは可能です。

回答No.2

n_na_tto · ベストアンサー

1/11の場合。
●Sheet1の右のほうのあいている列
(下の例ではD列)に作業列を作り、
＿＿＿_A＿＿＿_B＿＿＿_C＿＿_D_
_1＿期限＿タスク＿＿状況＿抽出_
_2＿_1/9＿『包括＿未処理＿＿_1_
_3＿1/11＿佐藤さ＿＿完了＿＿＿_
_4＿1/11＿免許更＿未処理＿＿_2_
_5＿1/12＿リンス＿未処理＿＿_3_
_6＿1/12＿シャン＿＿完了＿＿＿_
_7＿1/13＿田中家＿未処理＿＿_4_
_8＿1/14＿木村家＿未処理＿＿_5_
_9＿1/15＿論文の＿未処理＿＿＿_
10＿1/16＿新年会＿未処理＿＿＿_

D2
=IF(AND(A2-TODAY()<=3,C2="未処理"),COUNT(D$1:D1)+1,"")
下方向・↓

●それをもとにSheet2に抽出
＿＿＿A＿＿＿_B_
1＿期限＿タスク_
2＿_1/9＿『包括_
3＿1/11＿免許更_
4＿1/12＿リンス_
5＿1/13＿田中家_
6＿1/14＿木村家_

A2
=IF(ROW(1:1)>COUNT(Sheet1!$D:$D),"",INDEX(Sheet1!A:A,MATCH(ROW(1:1),Sheet1!$D:$D,0)))
下方向・↓右方向・→

お礼

ありがとうございます。
こんなにシンプルに設定できるものなのですね。
実際にうまくいく、とても感動しました。
ひじょうに感謝しております。重ね重ねもお礼申し上げます。

回答No.3

Nouble

配列数式を利用すれば意図も簡単にできますよ

先にお伺いしておきますが
一番左に並んでる日付は
文字列で入力されているのですか？
それとも日時のシリアル値ですか？

一応どちらでも出来るのですが
シリアル値を扱う方が格段に楽なので
シリアル値で説明します

まず期限ですが
ファイルを見てる瞬間の日時は
=today()
とすれば求まります
エクセルでは日付を日数で管理してますので
三日前は
=today()-3
ですね

これに達するとリストアップするわけですね
詰まり同じ意味として
=today()-4
を越えたものが対象ですね

これを先程の日付と比較します

エクセルは考え方をプログラム言語のベーシックを元にしているようでして
確かにＩＦ関数もいいのですが
ただ単に括弧でくくるだけで結果が得られます
この際左端はＡ列なので
$A:$Aですね
ではやってみましょう
=($A:$A>today()-4)

次に
未処理ですが
同様に

=($C:$C="未処理")
とすれば求まります

しつこいようですが
エクセルで条件成立をｔｒｕｅ
不成立をｆａｌｓｅというのですが
ベーシック同様内部的には０か１かで管理しているようです

なのでこんなことが出来てしまいます

=($A:$A>today()-4)*($C:$C="未処理")

この際成立は１
不成立は０となります

なのでこれらの中で１がどこにあるかを取り出せれば
あとは参照する関数を使うだけですので
もう９部９リンアルゴリズムは完成です

で、見つけ方ですが
色々ありますか１例をあげますと

結局不成立のものは不要なので

「逆に不要なものを探して整理してしまう」
と言うやり方をします

まずリストアップすべきものが何件あるか調べます

配列数式で要素内の数値を集計するのには
sumproduct関数をよく使います
今回もこれを利用して
=sumproduct(($A:$A>today()-4)*($C:$C="未処理"))
とすれはいいでしょう

つきに方針通り不要なものを整理します

どうするかと言うと
結果から言えば
各要素のあった位置の行ナンバー情報を与えるのですが
この際に不要なものには一定の上澄みをして
その上で昇順に並べかえると
不要な要素と必要な要素は整理され分離されるのです

まず不必要なものに一定の上澄みを施します

先の式は必要なものを示してますから、これにｎｏｔを施します
=not(($A:$A>today()-4)*($C:$C="未処理"))

選択的に不要なものだけに上澄みを施すには
現状不要なもののみが１を示していることを利用して
これに一定数を掛けてやればいいでしょう
エクセルでは最大の行数が６５５３５行目なので
後で行ナンバーを付与することを踏まえ
この６５５３５を掛けることにします
=not(($A:$A>today()-4)*($C:$C="未処理"))*65535

次の行ナンバーの情報ですが
行ナンバーの情報はrow関数で取得できます
こうです
=row($A:$A)

これを付与します
=not(($A:$A>today()-4)*($C:$C="未処理"))*65535+row($A:$A)
最大行数はどの行でも同数なのでこれでいいでしょう

では次は昇順にソートです
small関数が使えます
=small(not(($A:$A>today()-4)*($C:$C="未処理"))*65535+row($A:$A),1)
スモール関数は最後の要素を必要とする順位と認識し値を切り出してきます
ですので今回1を指定したので最小のものが求まるはずなのですが
ここで困ったことに仕様と言う名のエクセルのバグが
そうは問屋が卸さないとばかりに
邪魔をします
そこで先の式に手を加えてまじないをかけます
=small(index(not(($A:$A>today()-4)*($C:$C="未処理"))*65535+row($A:$A),0),1)

今回は
「こういう事もあるか」
位に受け止めて頂ければいいと思います

これで要素の抽出は出来たようなもので
先に求めた件数分１件目から取り出して
それを元に参照関数で参照すれば終わりです

今回は参照関数にoffset関数を使います
ではいきます

Ａ列の１件目を参照で取り出す場合
=offset(A$1,small(index(not(($A:$A>today()-4)*($C:$C="未処理"))*65535+row($A:$A),0),1),0,1,1)

しかしこれでは常に同じ内容しか出てこないのでもう一工夫

原因はスモール関数の順位が１に固定になってるからですので
これをフィルする毎に楽に増えるように変えます

先ほども述べましたが
row関数は参照先の行ナンバー情報を返しますから
参照先を通常よく使う相対参照形式で指定すると
フィルする毎に参照先も相対的に行位置が下がるので
この関数の返す値も増える
と言う仕組みです
=offset(A$1,small(index(not(($A:$A>today()-4)*($C:$C="未処理"))*65535+row($A:$A),0),row(A1)),0,1,1)

最大件数の制約も加えておきます
=if(sumproduct(($A:$A>today()-4)*($C:$C="未処理"))<row(A1),"",offset(A$1,small(index(not(($A:$A>today()-4)*($C:$C="未処理"))*65535+row($A:$A),0),row(A1)),0,1,1))

あとは他シートから参照する仕様に変えるために
仮にタスク表があるシートをシート１とすると
=if(sumproduct((シート１!$A:$A>today()-4)*(シート１!$C:$C="未処理"))<row(A1),"",offset(シート１!A$1,small(index(not((シート１!$A:$A>today()-4)*(シート１!$C:$C="未処理"))*65535+row($A:$A),0),row(A1)),0,1,1))
として
集計に使うシートの適切な場所
例えばＡ６にでも入力して
Ｃ６までフィル後
下向きに必要分フィルすれば完了です

バソで確認してないのでもしかしたら狂うかもしれませんが
その際はここを閉めず
その旨お知らせくだされば修正します

お礼

たいへんご丁寧にご解説いただき、誠にありがとうございました。
とてもお詳しく教えていただき、感激しました。
複雑なアルゴリズムを簡単に組めて、さらには解説もできるとは。
すごい憧れてしまいます。
このたびは本当にありがとうございました。
また困ったらよろしくお願いします。

回答No.1

hige_082

条件付書式を使用しては如何

条件付書式の条件１に
=AND(TODAY()=$A1,$C1="未処理")
書式を赤色
条件２に
=AND(TODAY()+3>=$A1,$C1="未処理")
書式を黄色
とすれば、未処理で当日は赤色
未処理で３日以内になったら黄色
視覚的に分かりやすいと思います

設定もＡＢＣ列すべてを選択し、設定すれば１回で終わりますよ

参考までに

お礼

質問欄に先述させていただいたとおりなのですが、
条件付き書式でも「シート１のタスク表の期限迫り未処理項目を、シート２に反映する」ことが可能ということなのでしょうか？
さっそく試してみようと思います。ありがとうございます。