『日付について。』（コルム） 次の日付のところは、関数ではないのでしょうか？例えば、表示形式で、変えて、4/13にしても、セルの内容を確認すると、2018/4/13になってしまいます。これを、2009/4/13にしたいのですが、どうすれば良いのでしょうか？後、後から、5/1や5/2を入力するだけで、2009/5/1や、2009/5/2にする方法はないのでしょうか？後、5/1や、5/2と入力するだけで、2009/5/1や、2009/5/2にしたいのです。日付の表示は、5/1の表示形式にしたあと、セルに、2009/5/1と打つしかないのでしょうか？なお、表示形式は、4/13になるよう設定してあります。画像は、下のURL です。すみません。返事が、来ないもので。 https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q12199525887 ＜ 使用 Excel：Excel2016、使用 OS：Windows10 ＞ ---- 需要があるかわかりませんし、テンプレ貼って注意喚起しようが、どうせ荒れるでしょうが、"更新"したので貼っておきます。 （私自身は、別トピックで回答を試みて疲弊したので、今のところテンプレ貼って静観の構えですが・・・） ●質問一覧（本サイトのみ） [[20181011182658]]____『万年カレンダーについて。』（コルム） [[20181020202532]]____『万年カレンダーについて。』（コルム） [[20181021112144]]____『箱ひげ図について。』（コルム） [[20181021154813]]____『箱ひげ図について。』（コルム） [[20181021162907]]____『箱ひげ図について。』（コルム） [[20181022123400]]____『縦の箱ひげ図について。』（コルム） [[20181022125526]]____『ピボットテーブルについて。』（コルム） [[20181024080641]]____『SUM関数について。』（コルム） [[20181024085712]]____『キューブ関数について。』（コルム） [[20181026144828]]____『箱ひげ図について。』（コルム） [[20181028131534]]____『ピボットテーブルについて。』（コルム） [[20181106191317]]____『ピボットテーブルについて。』（コルム） [[20181109205503]]____『randbetween 関数について。』（コルム） [[20181112162717]]____『見積書について。』（コルム） [[20181114093402]]____『見積書について。』（コルム） [[20181118181104]]＿＿『ピボットテーブルについて。』（コルム） [[20181123214608]]____『旅行案内文章について。』（コルム） [[20181128200651]]New!『日付について。』（コルム） 【質問者向け】 ・このサイトはマルチポストは禁止してませんが、それでも、他のサイトで 言われた（見た）ことをこちらで騒いでも解決になりませんので、持ち込まないようにしましょう。 ・パソコン塾の教材で疑問に思った場合は、塾の先生に聞きましょう。 ・パソコン教室に通っているのであれば、同じ画面を見ながら講師の先生に質問してみましょう ・気に入らないコメントが付いたら同じ内容でトピックを立て直すという癖は直しましょう。 ・適当に話を終わらせて、同じ内容でトピックを立て直す癖も直しましょう。 【回答者さん向け】 ・答えるときは冷静に！答える前に他のトピックを見て質問者さんの傾向を確認してください。 ・マルチポストの常連者であることが、指摘されています。言っても直りません。（直す気は無いようです） ・別サイトではメンタルを患っているとの投稿があったようです。 （本サイトでは本人と思われる投稿でそのような書き込みは確認されていません。） （ニックネームは内緒） 2018/11/28(水) 21:17 ---- 年を省略して、日付に見える値を入力すると、パソコン内部の時計を参照して、自動的に現在の年、月日に対応した(シリアル値)に変換される仕様です。 年を省略せずに入力しましょう。 なお、シリアル値については、以前説明しましたので、過去ログをじーっくり読んで、パソコンのスイッチを切り、紙と鉛筆を買いにいって、いわれたとおり、やってみましょう。 それが嫌なら、課題をだしたパソコン塾だか、パソコン教室の先生に言って、2009年の日付では、入力出来ないので、今年の年月日でもいいか、聞いてみましょう。 まちがっても、パソコン内蔵の時計を2009年にしようとおもってはいけません。 あなたの場合、直せなくなりますし、パソコンが自動的に時刻合わせしたらしたで、エクセルとまーったく関係ない話を、エクセル使っていたら、時計の時刻が変わってしまいました。なぜでしょう。という、なぞなぞをマルチポストするのが目にみえます。 （もこな２） 2018/11/28(水) 22:59 ---- Excel とも数学とも、無縁の生活を送った方がいいと思う。 （ぼ） 2018/11/29(木) 07:37 ---- ＞例えば、表示形式で、変えて、4/13にしても、セルの内容を確認すると、2018/4/13になってしまいます。 １．入力済みの日付は、後で書式を変えても、実体値を変えることは出来ません。 ＞これを、2009/4/13にしたいのですが、どうすれば良いのでしょうか？ そのデータを2009年に変えることは出来ません。 別のセルに関数を入れて違う年度にすることは出来ます。 　例： B1セルに =DATE(2009,MONTH(A1),DAY(A1)) 　　＜結果＞ 　　行 ____A____ ___ B ___ 　　 1 2018/4/13 2009/4/13 ＞5/1や5/2を入力するだけで、2009/5/1や、2009/5/2にする方法はないのでしょうか？ 回答じゃないですけど、 (1) なんで急にそんな古い2009年が出てくるんでしょうか？（もしかして2019年の間違い？） (2) 2010年(2020年？）にしたい時もありますよね？ 5/1 や 5/2 を入力しただけでは何年にしたいか分からないですよね？ 　 2009(2019）に限った話なんですか？ （半平太） 2018/11/29(木) 09:06 ---- 該当シートの見出しを右クリック [コードの表示]を左クリック Private Sub Worksheet_Change(ByVal Target As Range) If IsDate(Target.Value) Then Target = DateSerial("2009", Month(Target), Day(Target)) End Sub をエディターに貼付け でできます （TAKA） 2018/11/29(木) 09:28 ---- TAKAさんへ イベントの連鎖を止めないとマズくないですか？ （半平太） 2018/11/29(木) 10:08 ---- どうマズいんですか？汗 （TAKA） 2018/11/29(木) 11:55 ---- ↑は半平太さんへ （TAKA） 2018/11/29(木) 11:57 ---- 横から失礼します。 逆にイベントの連鎖は起こっていいという考えですか？ （とおりすがり） 2018/11/29(木) 13:07 ---- Private Sub Worksheet_Change(ByVal Target As Range) If IsDate(Target.Value) Then Target = DateSerial("2009", Month(Target), Day(Target)) MsgBox "おはよう" End Sub こんなコードだと無限におはようと表示されるって話ですよね？？？ 止めないとまずいなら Private Sub Worksheet_Change(ByVal Target As Range) Application.EnableEvents = False If IsDate(Target.Value) Then Target = DateSerial("2009", Month(Target), Day(Target)) Application.EnableEvents = True End Sub これでOKです （TAKA） 2018/11/29(木) 13:28 ---- 　質問者は日本語さえ極めてあやふやなので Excel VBA のコードを掲示することはまったく無意味である。 （ひひ） 2018/11/29(木) 14:47