Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12445 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【10537】セルに格納したデータについての質問です miro 04/1/30(金) 19:33 質問
【10540】Re:セルに格納したデータについての質問です Asaki 04/1/30(金) 19:46 回答
【10550】Re:セルに格納したデータについての質問... miro 04/1/31(土) 1:49 お礼
【10537】セルに格納したデータについての質問です
質問  miro  - 04/1/30(金) 19:33 -
引用なし
パスワード
   こんばんは初めまして。
よくこちらのサイトには足を運んで参照させて頂いてましたが、
今日は質問をしたくて書き込みさせて頂きました。

入力フォームのOKボタンを押すとセルに文字が入るように作成しました。
ちなみにそのフォームで入れるものは例えば記念日などの日付と
コメントを入力しています。
そしてそのセルに格納したデータを記念日になった時点で別のセル番地に
表示したいのです。
例：フォームからA1に2月1日、A2に結婚記念日と入力する。
そして2月1日になった時点でB1にA2部分の内容を表示する。

このような内容を実行したいのですが、私なりにINDEX関数やMACHI関数を
調べて試してみたのですが、やり方もわからないせいか、出来ませんでした。

どなたかこんなわかりずらい質問内容かもしれませんがわかる方が
居ましたらご返答よろしくお願いしますm(_ _)m
【10540】Re:セルに格納したデータについての質問...
回答  Asaki  - 04/1/30(金) 19:46 -
引用なし
パスワード
   こんばんは。

A1にシリアル値で日付が入っている場合は
=IF(A1=TODAY(),B1,"")

文字列として、2月1日 のように入っている場合は
=IF(A1=TEXT(TODAY(),"m月d日"),B1,"")

で如何でしょうか？
【10550】Re:セルに格納したデータについての質問...
お礼  miro  - 04/1/31(土) 1:49 -
引用なし
パスワード
   ＞Asakiさん
どうも初めましてこんばんは。
大変お返事が遅くなりましたどうもすみません(*_ _)
とりあえずテストの方で試してみたのですがちゃんと
Asakiさんが指示してくれた通り動作しました！！
この通り自分が今作っているファイルの方にも使っていこうと
思います。

ご返信どうもありがとうございましたm(_ _)m
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12445 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free