• ベストアンサー

セルの最終更新日を自動で表示させるには?

エクセルにA3:Z50のセル範囲の表がある場合、A3:D50のセル範囲のデータを更新した時はA1のセルに、E3:Z50のセル範囲のデータを更新した時はA2のセルに、自動的で更新日時が入力されるようにできるのでしょうか?

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

  • ベストアンサー
  • hige_082
  • ベストアンサー率50% (379/747)
回答No.2

#1です 範囲指定を間違いました Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A3:D50")) Is Nothing Then Range("A1").Value = Date ElseIf Not Intersect(Target, Range("E3:Z50")) Is Nothing Then Range("A2").Value = Date End If End Sub

11345
質問者

お礼

ご回答ありがとうございます。 できました。 ありがとうございます。

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

その他の回答 (1)

  • hige_082
  • ベストアンサー率50% (379/747)
回答No.1

'シートモジュールへコピペ _ (対象シートタブ右クリック、コードの表示、コピペ、閉じる) Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Range("A1:D50")) Is Nothing Then Range("A1").Value = Date ElseIf Not Intersect(Target, Range("E1:Z50")) Is Nothing Then Range("A2").Value = Date End If End Sub こんな感じでしょうか

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

関連するQ&A

  • 【エクセル】行の最終更新日を、あるセルに自動で入力させる方法。

    エクセルの表で、ある行のデータを更新した時、 その行の最末尾に作っておいた項目名「最終更新日」というセルのデータに 自動的に更新日時が入力されるようにするにはどのようにすればよいでしょうか?

  • エクセル表→セル内データ更新→同じ行の最終更新日欄の日付を自動更新 し

    エクセル表→セル内データ更新→同じ行の最終更新日欄の日付を自動更新 したい。 エクセルで作成した表で、表の中のデータを更新した場合に、その行の最後の列の「最終更新日」の日付を自動的に更新する方法を探しています。 具体的には、エクセルで1行目のA列に「データのキーワード」、B列に「データのハイパーリンク」、C列に「データ記入者」、D列に「最終更新日」の項目を作成し、2行目以降に作成した各データをA~Cの項目に従って記入してデータ一覧表を作成しています。 その際に、A,C列の項目を更新した時と、B列項目のリンクを開いた時に、同じ行D列の最終更新日の日付を自動で入力及び更新する方法はないでしょうか? 恐らくマクロを組む必要があると思うのですが、全くの素人ですので是非教えて頂けないでしょうか? すみませんが、宜しくお願い致します。

  • 特定セルの内容を更新したら、その更新日を自動的に表示する方法について

    エクセルで、特定のセルの内容を更新すると、別の特定セルに 更新日付が自動的に表示させたいと思っております。 例えば『A1』へ新規に文字入力したり、セルの内容を更新した時に、セル『B1』にその日の日付が自動で表示される。 そして、違う日にもう一度、同じ欄に入力すれば、その入力した日付に随時更新されるようにするための方法を教えていただければ幸いでございます。 御手数ですが、エクセル関数またはVBA、マクロのいずれかで実現可能な方法があれば教えて下さい。 何卒、宜しくお願いいたします。

  • エクセル セルデーター変更の自動更新日入力

    過去に質問がありましたが分らないので教えてください。 私の場合は、D列にのセルが変更されるとA列に更新日が自動で入力されるようにしたいのですが、恐れ入りますがお教えください。 因みに行は500行あります。 No.788307 質問:エクセルについて詳しい人教えてください。 質問者:yukkokun 行ごとで処理をしています。その行のデータの変更があった場合、その行のみ更新日を変更するようにしたいのですが、どうすればいいのですか。例えばA1~C1のいづれかを変更した場合、D1(更新日のセル)が自動的に変わるようにしたいのです。どなたかわかりやすく教えてください。関数等は初心者です。 )

  • VBAで非表示のセルに数字が入ると自動で表示できますか?

    お世話になります。 皆さんのお知恵をお借りしたく質問させていただきます。 タイトルのとおりなのですが、 例えば月ごとの売り上げ個数を表示させるために同シートの他のセルに範囲指定することで、関数で別シートの売り上げ個数が計算され表示されるようになっております。下の表だと1~3月までが入力してあり、次に4月までを範囲指定することで、4月の値が入った表を表示させたいのですが、エクセルで列D、Eが非表示されているとした場合、4月のデータがD列に入るとマクロを起動させることで自動表示(値が入った列のみ)してくれるVBAってありますか? よろしくお願いします。    A    B       C   F   G   1 1月  2月     3月 2  20   30    40 3   10   20     30 4 これを、    A    B       C    D   F   G   1 1月  2月    3月   4月 2  20   30    40     50 3   10   20    30    40 4 このようにしたいです。

  • あるセルにデータが入力された日を表示

    A列(A1)のセルにデータが入った場合、D列(D1)にそのセルに データが入力された日付を表示させたいのですが、どのように やったらいいでしょうか?TODAY関数を使うと毎回更新されて しまいます。 TEXT関数+TODAY関数で出来るかな?と思ったのですが、 =TODAY()を使うとセルに入力された日でなくて、ファイルを開いた 日付に毎回更新されてしまいます。 A列のセルにデータが入った時にD列にその入力日を表示させたい のです。こういう事は簡単に関数を使って出来ませんか?わかる方 がいれば教えてください。

  • エクセル複数のセル内容変更したら更新日を自動表示

    エクセル初心者です。 B2列からG2列にBからG社名(計6社)が記入されてます。 B3列からG3列以降に上記各社の金額を随時入力します。 H2列からM2列のセルは上記B社からG社の更新日と記入しています。 A3列以降には品名が記入されています。 B3列からG3列のセルの内容を更新すると、それぞれ該当する社名の H3列からM3列のセルに更新日付が自動的に表示させたいと思っております。 例えば、 B社の「B5」へ新規に金額入力したり、金額更新した時に、該当するセル「H5」に その日の日付が自動で表示される。 D社の「D6」へ新規に金額入力したり、金額更新した時に該当する「J6」に その日の日付が自動表示される。 そして、違う日にもう一度、同じ欄に入力すれば、その入力した日付に随時更新されるようにするための方法を教えていただければ幸いでございます。 特定のセルの場合の方法は検索等で確認できましたが、複数の場合の方法が分かりません。 何卒、宜しくお願いいたします。

  • 更新日を表示させたいのですが

    例えばExcellで住所録表を作成し、各列に”名前””住所””電話番号の欄をつくり、各行に1名ずつ情報を書くような表を作成したとします。 ある行の(人の)情報をいずれか1つでも変更し更新された場合、その行の左端のセルに更新日を自動表示させるような関数や方法はありませんか。 ・・・住所録では無いのですが、会社の部署全体で共有しているExcellの表がありまして、その表の内容のいずれか変更があった場合に毎週それをチェックして報告しないといけないのですが、各行毎に更新日時が自動表示されたら、更新日時で絞り込みを行えばその週で変更があった行だけ一目でわかるようになるのになと思っていまして。 わかりにくい質問で申し訳ないのですが、おわかりの方いらっしゃいましたらお教え下さい。よろしくお願いいたします。

  • 最終更新日

    実行中のファイルの最終更新日を取得したいのですが、どうすればよいですか? エクセルのファイル等を開くと、ファイルの更新日には開いた時の日時が一時的に入り、そのファイルを保存せずに終了すれば、開く前に入力されていた更新日に戻りますが、この開く前に入力されて更新日を所得したいのです。 DateLastModified等を使用すると開いた時の日時になってしまいます。 何か方法をご存知でしたら教えて下さい。

  • EXCEL-セル範囲の自動取得する。

    EXCELにて、セル範囲を自動で求めて計算に使用したいのですが 今セルA1に日付けデータが B1にデータが入っています。 Y2で日付06/05におけるデータの最小値を求めたいのですが、セルAには06/05は2つとは限りません。Y1の06/05の日付けと一致するAのセルからデータ範囲B1-B?までを自動的に算出し、MIN関数の範囲としてセルに入れたいのですが、可能でしょうか?あるいはVBAで作成可能でしょうか? Y1のセル計算式    =MIN(B1:B?)  B1:B?を自動的に求めたい。    A(日付) B(データ)    X    Y  Z 1 06/05   6.5      日付  6/5 6/5 2 06/05   5.0      最小値    ←B1~B?の最小 3 06/05    ・ 4  ・    ・ よろしくお願いします。