★またファイル名「和暦西暦180424」を使う ― 2026年07月21日 09:15:23
▲以前ファイル名「和暦西暦180424」については記した。今回はその続きとなる。
①エクセルファイル「エクセル①260721」を作成した。これは最近はエクセルで何か作ることが少なくなり、たまに何か作ろうとすると、使い慣れた関数式など思い出せず途惑うことそきり。そこで何でも先ずはここで思いつくまま関数等を吐き出し、記憶を守るようにしようと考えた。
②その第一番目の「シート」は某氏に戴いた最新論稿に関連して作成した私の資料である。論稿にある日付にその「西暦」を加え、いくつかの「地名」にはその現在の「地名」をネットで調べて書き足した。その始めは慶長5年「9月15日」、有名な関ヶ原の戦だ。その終りは同年「10月3日」。西暦ではそれぞれ1600年「10月21日」、「11月8日」だ。
③今二番目の「シート」に「日経パソコン」の最新資料を入れ込み中だ。該当ページをコピーしてワード化ならともかく、エクセル化は苦慮中。記事の一部で小休止。
▲我父方曽祖父は西南戦争(1877年)に少年兵として参戦、そして無事帰還した。当然曽祖父は江戸時代の生まれ、「和暦西暦180424」でその西暦での何年何月何日を調べ、昭和に死んだ年月日からその生きた年月日を逆算してわかった。どうやら私は今それを越えたようである。
▲私の「和暦西暦180424」は、西暦1500年から1872年までの一日々々を並べて作った膨大な暦であるが、実用は1600年からとしてある。それは西暦1873年1月1日が明治6年1月1日(和暦明治5年12月3日)で終る。以後現在に至る。役人は12月１日と2日の給与を期待したが、貰えなかったとか。
※愚痴：作った当時はエクセルは1500・1600・1700・1800(1872まで)を単シートでは作れず(10万行まで)、100年単位の4つの年表を作り、各種暦になるよう工夫せざるを得なかった。
●４つの時の関数※作成年不明
=IF(AND($A75<=18721202,$A75>=18000101),DGET(表1!$BB$3:$BQ$36527,15,K74:M75),IF(AND($A75<=17991231,$A75>=17000101),DGET(表1!$AK$3:$AZ$36527,15,K74:M75),IF(AND($A75<=16991231,$A75>=16000101),DGET(表1!$T$3:$AI$36528,15,K74:M75),IF($A75<=15991231,DGET(表1!$A$3:$R$36528,15,K74:M75)))))
●１つの時の関数※作成年2018年
=IF(AND($A76<=18721202,$A76>=15000101),DGET(表1!$B$3:$V$146091,15,K75:M76))
①エクセルファイル「エクセル①260721」を作成した。これは最近はエクセルで何か作ることが少なくなり、たまに何か作ろうとすると、使い慣れた関数式など思い出せず途惑うことそきり。そこで何でも先ずはここで思いつくまま関数等を吐き出し、記憶を守るようにしようと考えた。
②その第一番目の「シート」は某氏に戴いた最新論稿に関連して作成した私の資料である。論稿にある日付にその「西暦」を加え、いくつかの「地名」にはその現在の「地名」をネットで調べて書き足した。その始めは慶長5年「9月15日」、有名な関ヶ原の戦だ。その終りは同年「10月3日」。西暦ではそれぞれ1600年「10月21日」、「11月8日」だ。
③今二番目の「シート」に「日経パソコン」の最新資料を入れ込み中だ。該当ページをコピーしてワード化ならともかく、エクセル化は苦慮中。記事の一部で小休止。
▲我父方曽祖父は西南戦争(1877年)に少年兵として参戦、そして無事帰還した。当然曽祖父は江戸時代の生まれ、「和暦西暦180424」でその西暦での何年何月何日を調べ、昭和に死んだ年月日からその生きた年月日を逆算してわかった。どうやら私は今それを越えたようである。
▲私の「和暦西暦180424」は、西暦1500年から1872年までの一日々々を並べて作った膨大な暦であるが、実用は1600年からとしてある。それは西暦1873年1月1日が明治6年1月1日(和暦明治5年12月3日)で終る。以後現在に至る。役人は12月１日と2日の給与を期待したが、貰えなかったとか。
※愚痴：作った当時はエクセルは1500・1600・1700・1800(1872まで)を単シートでは作れず(10万行まで)、100年単位の4つの年表を作り、各種暦になるよう工夫せざるを得なかった。
●４つの時の関数※作成年不明
=IF(AND($A75<=18721202,$A75>=18000101),DGET(表1!$BB$3:$BQ$36527,15,K74:M75),IF(AND($A75<=17991231,$A75>=17000101),DGET(表1!$AK$3:$AZ$36527,15,K74:M75),IF(AND($A75<=16991231,$A75>=16000101),DGET(表1!$T$3:$AI$36528,15,K74:M75),IF($A75<=15991231,DGET(表1!$A$3:$R$36528,15,K74:M75)))))
●１つの時の関数※作成年2018年
=IF(AND($A76<=18721202,$A76>=15000101),DGET(表1!$B$3:$V$146091,15,K75:M76))
