セルに値をいれたら、いついれたか表示されるのVB
- セルに値をいれたら、いついれたかの日付が表示されるVBが知りたいです。
- A列に任意の値を入力すると、B列にその入力日の日付が表示される方法を教えてください。
- マクロを使ってセルに値を入れると、その入力日の日付が自動的に表示される方法を教えてください。
- ベストアンサー
セルに値をいれたら、いついれたか表示されるのVB
すいません。質問です。 セルに値をいれたら、 その入力は、いつ入力したかの日付が表示されるのVBが知りたいです。 例としては A列に任意に数字を入れます。 そうすると、B列に日付が入ってほしいのです。 ↓↓↓↓↓↓↓↓↓↓↓ A B C 1 あお 1/12土 2 3 4 あか 1/15火 5 上記のように、A1に「あお」といれたらB1に「それを入力した日付」 上記のように、A4に「あか」といれたらB4に「それを入力した日付」 がいれたいです。(次にファイルを開いたときも、todayでなくその入力日の情報のままで) ここをみたら、 http://q.hatena.ne.jp/1184651644 できそうなんですが、 これ、A1とA2という単独のセルにに対してしかできなさそうで、 A列に対して、B列にずっと表示するには、どういうマクロをくめばよろしいのでしょうか? どうぞおしえてくださいませm(_ _)m
- deepimpact
- お礼率43% (76/173)
- オープンソース
- 回答数2
- ありがとう数2
- みんなの回答 (2)
- 専門家の回答
質問者が選んだベストアンサー
そのサイトのコードを参考に Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column = 1 Then If Target.Value <> "" Then Target.Offset(, 1) = Format(Date, "m/d aaa") End If End Sub こんな感じでしょうか?
その他の回答 (1)
- red0176
- ベストアンサー率22% (22/97)
vbaですね? セルのチェンジイベントに書けば良いと思います。
関連するQ&A
- あるセルにデータが入力された日を表示
A列(A1)のセルにデータが入った場合、D列(D1)にそのセルに データが入力された日付を表示させたいのですが、どのように やったらいいでしょうか?TODAY関数を使うと毎回更新されて しまいます。 TEXT関数+TODAY関数で出来るかな?と思ったのですが、 =TODAY()を使うとセルに入力された日でなくて、ファイルを開いた 日付に毎回更新されてしまいます。 A列のセルにデータが入った時にD列にその入力日を表示させたい のです。こういう事は簡単に関数を使って出来ませんか?わかる方 がいれば教えてください。
- ベストアンサー
- オフィス系ソフト
- VBA 複数のセルの値をテキストボックスに表示する
いつもお世話になっております。 初歩的質問かも知れませんが、宜しくお願いします。 EXCEL2007使用。 Sheet2に下記のような値があります。 A B C D E 1 あか きいろ みどり みどり しろ 2 しろ しろ しろ くろ 3 しろ あか しろ あお 4 きいろ あお しろ あお 5 くろ あか 6 くろ あお 7 しろ A1:E7までの範囲の値を、 Sheet1にあるテキストボックス(またはコンボボックス)に縦に表示したいのです。 A~Eの複数の列の値には空白も含まれていて、 縦一列に値を表示するにも、空白を省く処理ですでに躓いております。 何か良い方法がありましたら、 ぜひご教授お願いいたします。
- ベストアンサー
- オフィス系ソフト
- EXCELに詳しい方教えてください
例えばA1「あか」A2「あお」A3「きいろ」を入力 別のセル(例えばB1)に3つのうちいずれかをランダムに表示させる 上記の方法を教えてください。 よろしくお願いします。 EXCELは簡単な関数ならば使えるレベルです・・・
- ベストアンサー
- Windows XP
- Excelで、特定の条件を満たすと指定のセルの値を消去するマクロ
WindowsXP環境でExcel2000を使用しています。現在A列に日付、B列にA列の日付を引数として得た曜日を表示させ、条件書式で曜日が土日ならセルの色が赤くなるように設定しています。C列には始業時間D列は終業時間がそれぞれ予定としてあらかじめ入力した状態にしてあります。そこで、上記によって取得した曜日が土日にあたるセルの右側、つまりB列およびC列の値を自動的にもしくはマクロ処理で消去したいのですが、なにか良い方法はないでしょうか? よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- セル内の内容をコピー
セルA1に=TODAY() セルA2に=TODAY()-1 セルA3に=TODAY()-2 があります。 別のセルを選択して上記のいずれかをクリックすると、その日付をコピーするようなことはできますでしょうか? マクロじゃないとダメだと思いますが、登録の仕方も合わせてご教授くださいませ。 よろしくおねがいします。
- ベストアンサー
- オフィス系ソフト
- VBA 期間を指定してデータを別シートに抽出
sheet1に下記のような(例)データベースがありA~N列までデータが入力されています。 A B C D E F G H I J K L M N 1 りんご ○○ BA 2526 ○ あお *** *** *** *** *** *** 2015/7/1 2 みかん ×× BC 2526 ○ あお 2015/8/1 3 すいか ●● BB 2429 ● あか 2015/8/12 4 メロン □□ DC 2355 □ あか 2015/7/13 5 バナナ ○× FE 2526 ○ あお 2015/6/1 6 いちご ●□ LA 2429 ● あお 2015/8/21 7 ぶどう □○ HK 2526 □ あか 2015/8/7 「sheet1」N列の日付を元にして、別シート(sheet2)のA2列に「開始日付(yyyy/mm/dd」、B2列に「終了日付(yyyy/mm/dd」(例:2015/8/1~2015/8/31)を入力し、フォームボタン(例:抽出)で検索を開始し、抽出された結果のsheet1のA列~G列、N列のみ(H列~M列は不要)をSheet2のA7以下へ表示したいと考えています。 A B C D E F G N 2 みかん ×× BC 2526 ○ あお 2015/8/1 3 すいか ●● BB 2429 ● あか 2015/8/12 6 いちご ●□ LA 2429 ● あお 2015/8/21 7 ぶどう □○ HK 2526 □ あか 2015/8/7 期間を指定し検索した結果を別のシートへ表示するにはどのようなVBAのコードを使用すれば良いでしょうか。 宜しくお願いします。
- ベストアンサー
- Excel(エクセル)
- マクロにてセルに文字表示
マクロで1つのセルに次の文字を表示したいのですが記述を教えて下さい、 =today()にて年月日続けて「クリックしました。」の表示です、 range("a1").value="=today()" range("b1").value="クリックしました。" この表示を A1 セルに続けて表示したいのですが、 "=today()"と"クリックしました。"を結合したいのです。
- ベストアンサー
- Visual Basic
- セルのコメントに他のセルの値を表示
Excel2010です。下記を実現するための方法(マクロ?)を教えて頂けないでしょうか。 A1~A5セル:管理Noとして1-1、1-2、2-1、2-2など任意の数字 B1~B5セル:項目名(例:りんご、みかん・・・) A11~A15セル:A1~A5にある管理Noのうち、任意の数字を手入力 このような状況の時、A11~A15セルのコメント欄に、 そのA11~A15セルに記入された管理Noに対応する、B1~B5の内容を表示させたいです。 例: A1セル:1-1 B1セル:りんご A11セル:1-1 A11セルのコメント欄:りんご 上記のイメージです。 お手数ですがよろしくお願いします。
- 締切済み
- その他MS Office製品
- VBA2010,B3の値が変わったら、A3に
VBA2010で,B列の値が変わったら、A列の同じ行に前日の日付を入力するには、マクロコードをどのように書けばよいですか?B列データ入力範囲はB3~B65536 尚、B3~B65536にはVLOOKUPで、他のブックから値を参照しています。 最後にA列の同じ日付セルを結合し、I列、P列、W列の同じ行に結合したセルをペーストたいのです。 宜しくお願い致します。
- 締切済み
- Visual Basic
- 固定したセルに次々に下げるセルの値を表示するには
A列に下記の数字がある時にカーソルを下げて行くだけで1行目のB列のセルに数字が入力されるようにするには、どんな関数をつかったらできますか。 A列 45 46 47 49 25 36 26 85 69
- ベストアンサー
- Excel(エクセル)
お礼
ありがとうございました! m(_ _)m