• ベストアンサー

日付が一致したセルに自動入力するようには?

  A B C D E 1 7               ←月 2 1 2  3 4 5       ←日    3 4 というシート1があり、シート2のB4に日付(7/5など)を入力すると シート1のE4に○と出したいのです。 シート2のB行は何行もあり、シート1の同行の同日の交差セルに○と出るようにしたいのです。 宜しくお願いいたします。

質問者が選んだベストアンサー

  • ベストアンサー
  • mu2011
  • ベストアンサー率38% (1910/4994)
回答No.1

一例です。 A4に=IF(A$2<>"",IF(COUNTIF(Sheet2!$B:$B,DATE(YEAR(TODAY()),$A$1,A$2)),"○",""),"")を入力、右方向にコピー

asasdf
質問者

お礼

ありがとうございます。 $B:$Bを$B4とする事で希望の表ができました。 どうもありがとうございました。

全文を見る
すると、全ての回答が全文表示されます。

その他の回答 (1)

  • imogasi
  • ベストアンサー率27% (4737/17068)
回答No.2

>シート2のB4に日付(7/5など)を入力すると Sheet2のB4 は1例と思うが、次はSheet2のどのセルにデータが入るのか。B5と考えて良いのか。 連続しないでB4、B5[、B8  ・・などに入るのか。 その場合は、同じ月日はSheet2のB列で入らないのか。 そういうことを明確に質問する前に想像できるようになること。 Sheet2の実例も質問に書くべきだ。 ーー 関数でも出来るかもしれないが、この質問はVBA向きの質問だな。 ーー 関数でやるなら Sheet1の第4行に○を並べるとして(これも質問に明確になっていないよ) Sheet2のB列にその日と同じ日付けがあれば○を入れる。その式をA列(1日に該当)から31日のAE列まで式を複写する。 式は =IF(ISERROR(MATCH(DATE(2011,$A$1,COLUMN()),Sheet2!$B$1:$B$100,0)),"","○") 質問説明不十分と思うが、こういう問題か? ーー 同じ日がSheet2のB列に2度出ても影響しない回答。 例データ Sheet1 A1:F5 右列は略 7 1 2 3 4 5 6 ○ - ○ - ○ - ーー Sheet2 B列 7月1日 7月3日 7月10日 7月5日 ・・・

asasdf
質問者

お礼

多々説明不足ですみません。 ありがとうございました。

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • 2つのセルを一つに・・しかし、日付のセルが数値に変わってしまう

    セルには     A        B      1 2005年5月   修正あり  と入力されています。 C1に、AとBに入っている文字をつなぎ合わせ、更に結合した部分を:で区切ろうと思い、C1セルに「A1&":"&B1」と入れました。 すると、C1に 36647:修正あり と出てしまいました。 日付が数値に切り替わっちゃったのですが、日付は日付で数値に切り替わらないようにする方法はありますか? 500行ぐらいあるので・・お願いします。

  • 列と行で一致したセルに

    HY-123 1/3 15個 AB-456 1/1 50個  といようなデータを入力したら 自動で下の表(A列の製造番号、1行目の日にちは固定の表)に 個数が入るにはどうすればいいですか? 番号と日付が一致すれば、その交差セルに個数が出るようにしたいのです。 宜しくお願いいたします。 1月  A     B    C    D 1          1    2    3 2  HY-123            15 3  AB-456   50

  • VBA 条件の一致する行の特定のセルの削除について

    VBA初心者です。よろしくお願いします。 <sheet1>     A  B   C  D  E 1   1 1211 佐藤 10 100 2   2 1344  山田 25 150 3   3 1522 田中  5 80 4   4 1655  高橋 35 200 ・ ・ 100 100 3682 小林 40 300 <sheet2>    A   B 1 1344 2 この様な表があったとします。(見辛くてすみません) "sheet2"A1セルに入力した内容と同じ内容を"sheet1"のB列から検索し、その行のB~Eのセルを削除するにはどのようにしたら良いでしょうか? 例えば"sheet2で"「1344」と入力した場合、"sheet1"の「1344」のある2行目のB~Eのセルを削除するといった感じです。 削除後の空白は詰める必要はなく、マクロを記録させるボタンは"sheet2"に貼り付けます。 色々調べましたがどうにも分からない為質問させていただきます。 よろしくお願い致します。

  • EXCELで入力セルの自動移動

     項目  値1 値2 値3 値4 値5  1 A1  B1 C1 D1 E2 F2 2 A2  B2 C2 D2 E2 3 A3 上記のような表で、横方向に入力の作業をする場合、0(ゼロ)を入力したら、次の行の項目セルに移動する方法はどのようにしたらよろしいのでしょうか。 F2に0を入力したらA2に、E2に0を入力したらA3にということですが。 よろしくお願いします。

  • エクセル 1行で1セルだけ入力できるようにしたい

    エクセルで1行に1セルしか入力できない方法を教えてください。 下記のレイアウトで2~5行に1点~5点までを選んで入力してもらいます。A列は「1点」としか入力できないように、「入力規則」のリストでプルダウンで1点しか入力できないように設定しました。B~E列も同様です。1行で1点~5点の1つだけ入力してもらいたいので、例えばA2で1点と入力したら、B2~E2に入力できなくなるようにする方法はありますでしょうか?B2にだったら2点と入力したら2行目のほかのセルは入力できないようにするようにしたいのですが・・・。 どなたかご教示願います。シートはこのレイアウトしか使えず困っています。よろしくお願いします。   A   B   C   D   E 1 1点 2点 3点 4点 5点 2 3 4 5

  • Excelセルに条件付きの日付を入力したい

    B列5行目の日付を入力したときD列5行目の数字とその上の行にある数字が一致した右隣E列と日付の差が5日以上経過していればC列5行に"ー"を差が5日未満であればB列の日付に5日を足した日付を順々に入力したいのですがどなたか関数の解る方よろしくお願いします。 因みに環境はoffice2013です。

  • エクセルの入力データーを別のシートの日付と氏名の交差点に記録していくマクロ

    エクセルのセルに入力したデーターを別のシートの名簿一覧に記録していくにはどのようなマクロを組めばよいでしょうか? 入力イメージとして、「田中 90 良」この項目は手動で入力するとします。 Sheet1 A   B  C  D  E  F  G 1 日付 氏名 成績 区分 2 9/19 田中 90  優 ここでマクロを実行すると別のシートに Sheet2 A   B  C  D   E   F  G 1       1組       2組 2    田中 佐藤 小林 近藤 三浦 遠藤 3 9/19 90  と記録され、次に入力し、 Sheet1 A   B  C  D  E  F  G 1 日付 氏名 成績 区分 2 9/21 小林 80  良 さらにマクロを実行すると Sheet2 A   B  C  D   E   F  G 1       1組       2組  2    田中 佐藤 小林 近藤 三浦 遠藤 3 9/19 90  4 9/21        80 このように記録され、さらに Sheet1 A   B  C  D  E  F  G 1 日付 氏名 成績 区分 2 9/23 佐藤 95  優 と入力して、さらにマクロを実行すると Sheet2 A   B  C  D   E   F  G 1       1組       2組 2    田中 佐藤 小林 近藤 三浦 遠藤 3 9/19 90  4 9/21        80 5 9/23    95 という具合に、氏名と日付が交差するセルにデーターを記録していきたいのですが、 可能でしょうか? どうかお返事よろしくお願いいたします。

  • VBAを使って色々なセルに同じ文言を入力したいのですが・・・

    VBA超初心者です。 sheet2(A2)に日付(平成○年○月○日)を入力したのですが、 これをsheet1の色々なセルに反映させたいのです。 反映さえたいセルは規則性があって、 D、H、L列の3行目、28行目、53行目・・・と25行置きに反映させたいのですが、どうすればいいでしょうか??

  • 日付を自動入力する方法

    入力フォームと言うシートの日付列A8からA22(A8からD8まで結合して、このパターンでA22まであります)まで日付を入れるようにしています。右隣の列E8からE22は商品名が入る列です。 今は、下記のVBAで日付のセルを選択して、日付が自動で入るボタンを押して、本日の日付を入力しています。K28には=today()の関数が入っています。 Sub 日付入力()  ActiveSheet.Unprotect  Range("K28").Copy  ActiveSheet.Paste  Application.CutCopyMode = False  ActiveSheet.Protect End Sub これを日付のマクロボタンを押す毎に、A8からA22まで順番に入力できるようにするにはどうすればよいでしょうか? 尚、入力フォームの作成・保存が終わるとA8からA22まですべて、セルの値を消去するマクロボタンを作っています。

  • 二つのシートのセルを比較して、あるセルの値が一致した場合に、片方のセル

    二つのシートのセルを比較して、あるセルの値が一致した場合に、片方のセルの値を 別のシートに設定するには、どうしたらいいでしょうか? [シート1] --|A---B---C---D---E --+---+---+---+---+--- 01|A1 ??? 02|A2 yyy 03|B1 ??? 04|C1 sss [シート2] --|A---B---C---D---E --+---+---+---+---+--- 01|A1 aaa 02|A3 bbb 03|B0 xxx 04|B1 ccc 05|C1 sss シート1 [Aのセル]とシート2の[Aのセル] を比較し、同じ値だった場合に、 シート2の [B] の値を シート1の[C]に設定するための関数はどのようにしたら良いでしょうか? 最終的に、シート1が --|A---B---C---D---E --+---+---+---+---+--- 01|A1 ??? aaa 02|A2 yyy 03|B1 ??? ccc 04|C1 sss sss となります。 Excelの関数あマクロは、どうしても分からなく質問させてもらいました。 申し訳ありませんが、ご教授宜しくお願い致します。

専門家に質問してみよう