Excel (一般機能)

Excelの一般機能に関するフォーラムです。
  • 解決済みのトピックにはコメントできません。
このトピックは解決済みです。
質問

 
(Windows 10 Pro : Excel 2016)
令和問題
投稿日時: 20/10/12 16:09:26
投稿者: okamoto0812

今更なのですが,質問させてください。
Windows10(2004)でExcel2016を使用しています。
TODAYで今日の日付を反映すると平成32年となってしまいます。
書式設定はユーザー設定で
[$-ja-JP]ggge"年"m"月"d"日"
としています。
また「2」年の2だけを表示させたいのですが,32年になってしまいます。
書式は
[$-ja-JP]e;@
です。
 
もう運用を始めてしまっているため,関数の変更はできないため,エクセルのバージョンを上げたいのですが,会社の設定でwindowsupdataで自動更新はできず,手動で更新しなければならないのですが,マイクロソフトのHP上からいくつかダウンロードしても変化がありません。
令和問題に関連した手動アップデート用の更新ファイルの場所をご存じの方がいれば,ご指導お願いします。

回答
投稿日時: 20/10/12 17:01:23
投稿者: Suzu

対応の為には、
・Windows の他に
 
・.NET Framework
【.NET Framework の新しい日本語版の更新プログラムの概要】
https://docs.microsoft.com/ja-jp/troubleshoot/dotnet/framework/new-japanese-era-updates
 
・Office
【日本の新元号に関する Office の更新プログラム】
https://support.microsoft.com/ja-jp/help/4478844/office-updates-for-new-japanese-era
 
の対応が必要みたいですね。

回答
投稿日時: 20/10/13 15:45:49
投稿者: Mike

他所での私の投稿「Excel 2013 には、もう“令和”対応自動更新はあり得ないか?」
https://oshiete.goo.ne.jp/qa/11125819.html
を御覧あれ。
其処の 2019/05/25 11:59 附の私の[補足]欄に“感動的”に認めた一文を今讀み返して、胸が込み上げて居ります。(*^_^*)
♪ミッカ遅れの便りを乗せて…♪ならぬ、私の場合は“25日遅れの令和表示”でした。
「会社の設定でwindowsupdataで自動更新はできず」とは御同情申し上げる次第で、嘸かし、1936年の懐メロ♪あゝそれなのに♪が口を衝いて出やうかと。

回答
投稿日時: 20/10/13 16:56:50
投稿者: んなっと

念のためレジストリも確認しておきましょう。
以下のサイトがうまく手順説明されています。
 
新元号「令和」を表示させる方法
https://mr-arakan.com/gengou_reiwa/
 
...もちろんこれだけではだめだと思いますが。
 
 
 
※メモ帳で以下の文字列を Reiwa.bat などと保存して
バッチファイルを実行する方法もあります。手順は詳しく書きません。
 
Windows Registry Editor Version 5.00
 
[HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Nls\Calendars\Japanese\Eras]
"2019 05 01"="令和_令_Reiwa_R"

投稿日時: 20/10/14 08:19:00
投稿者: okamoto0812

みなさんコメントありがとうございます。
現状です。
補足ですがoffice2016はボリュームライセンスのためソフトからアップデートができません。
その後,Windowsアップデートの自動更新をオンにすることができ,片っ端からかけている状態です。
  
Suzuさん
2004バージョンのアップデートがないのでどれを入れればよいのか困ってます。
  
Mikeさん
同じく苦労されている方がいて,この問題の根深さが伝わります。
同じように片っ端からかけていますが・・・
いまだ変わらないです・・・
  
んなっとさん
レジストリには既に存在していました。
職場PCなのでなんとか正規の方法で対応したいです。。。

回答
投稿日時: 20/10/14 08:59:20
投稿者: Suzu

引用:
補足ですがoffice2016はボリュームライセンスのためソフトからアップデートができません。
その後,Windowsアップデートの自動更新をオンにすることができ,片っ端からかけている状態です。

 
Windows インストーラー (MSI) なのですね。
 
Microsoft UpDate が使用できる様になったのであれば、更新プログラムを個別にインストールする必要は無いのではありませんか?
 
もし、Microsoft UpDate にて Office製品の更新が出来ない状態なのであれば
 
こちらを参考にしてみてください。
【[w7w10o2016u]Office2016の更新プログラムが取得・適用出来ないときの対処方法】
http://www.b-space.net/win7-win10-office2016-update/

回答
投稿日時: 20/10/14 10:25:41
投稿者: Mike

okamoto0812 さんの引用:
同じく苦労されている方がいて,この問題の根深さが伝わります。
下記は“その方”からのプレゼント(?)です(押しつけがましい!)。
貴方のPCが令和對應する迄の一助に成れば仕合せかと(*^_^*)
 
    A     B   C   D    E  F  G
1 西暦年月日 和暦年月日  シリアル    元号 略 補数
2 1900/01/01 M33.01.01  1900/01/01 明治 M +33
3 1912/07/29 M45.07.29  1912/07/30 大正 T -11
4 1912/07/30 T01.07.30  1926/12/26 昭和 S -25
5 1926/12/25 T15.12.25  1989/01/08 平成 H -88
6 1926/12/26 S01.12.26  2000/01/01 平成 H +12
7 1989/01/07 S64.01.07  2019/05/01 令和 R -18
8 1989/01/08 H01.01.08
9 2018/04/30 H30.04.30
10 2019/04/30 H31.04.30
11 2019/05/01 R01.05.01
12 2020/05/01 R02.05.01
13 2020/10/14 R02.10.14
14 2021/05/01 R03.05.01
15 2022/05/01 R04.05.01
16 2023/05/01 R05.05.01
 
B2: =VLOOKUP(A2,JYTable,3)&TEXT((TEXT(A2,"y")+VLOOKUP(A2,JYTable,4)),"00")&"."&TEXT(A2,"mm.dd")
JYTable は、範圍 D2:G7 に附けた名前です。
 
式 =MID(B13,2,2)*1 で、令和2年の「2」が抽出出來ますよ。

回答
投稿日時: 20/10/15 15:43:56
投稿者: んなっと

関数で別セルに表示するときは、この方法ですよ。
 
       A         B  C
 1  1900/1/1  明治33年1月1日 33
 2  1912/7/29  明治45年7月29日 45
 3  1912/7/30  大正1年7月30日  1
 4 1912/12/31  大正1年12月31日  1
 5  1913/1/1   大正2年1月1日  2
 6 1926/12/24 大正15年12月24日 15
 7 1926/12/25  昭和1年12月25日  1
 8 1926/12/31  昭和1年12月31日  1
 9  1927/1/1   昭和2年1月1日  2
10  1989/1/7  昭和64年1月7日 64
11  1989/1/8   平成1年1月8日  1
12 1989/12/31  平成1年12月31日  1
13  1990/1/1   平成2年1月1日  2
14  2019/4/30  平成31年4月30日 31
15  2019/5/1   令和1年5月1日  1
16 2019/12/31  令和1年12月31日  1
17  2020/1/1   令和2年1月1日  2
 
B1
=IF(A1<43586,TEXT(A1,"ggge"),"令和"&TEXT(A1,"yyyy")-2018)&TEXT(A1,"年m月d日")
下方向・↓
C1
=IF(A1<43586,TEXT(A1,"e"),TEXT(A1,"yyyy")-2018)*1
下方向・↓

回答
投稿日時: 20/10/15 21:25:08
投稿者: Mike

んなっと さんの引用:
関数で別セルに表示するときは、この方法ですよ。
流石ですね!御見逸れしました。今後は使はせて戴きます。m(_._)m

投稿日時: 20/10/16 17:53:56
投稿者: okamoto0812

みなさんの情報を参考に解決しそうな気配が見てきました。
がんばります。
ありがとうございました。