ファイルメーカーユーザの集い Part4 [無断転載禁止]©2ch.net

[過去ﾛｸﾞ] ファイルメーカーユーザの集い Part4 [無断転載禁止]©2ch.net (1002ﾚｽ)
上下前次1-新
抽出解除ﾚｽ栞

このｽﾚｯﾄﾞは過去ﾛｸﾞ倉庫に格納されています｡
次ｽﾚ検索歴削→次ｽﾚ栞削→次ｽﾚ過去ﾛｸﾞﾒﾆｭｰ

568(4): 2019/05/15(水)21:59 AAS
それで質問なんですが、令和への対応として、表示・印刷用レイアウトには計算フィールドを作り、
Caseで分岐して"令和"&(TextToNum(Year(日付フィールド))-2018)で良いんですが
入力でR1/5/15を西暦に変換してくれるのは、6.0Jはスクリプトトリガーも無いし無理ですよね?

569: 2019/05/15(水)23:35 AAS
>>568
好きにしたらええやん。
今どき6のノウハウなんて、あんさんが一番やと思うし。

572: 2019/05/18(土)00:20 AAS
>>568
テキストフィールドを変換すればいいじゃん
頭悪すぎ

579: 568 2019/05/19(日)00:10 AAS
遅くなりましたが、アドバイスどうもありがとうございます
計算した結果を日付フィールドに貼り付けないといけないと思いこんでまして、そのため入力されたら動作するスクリプトが必要と考えてました
>>574でその思い込みをぶち壊して頂いて、大いにパクらせていただき、さらに>>575も参考にしてDate関数を使うことにし、
無事令和対応を行うことができました

これで自分の業務には一生6.0Jでやっていけると思います
大変ありがとうございました

<日付入力正規化>
Substitute(Upper(RomanHankaku(生年月日入力[令和対応])),".","/")
<日付テキスト>
Substitute(Substitute(Substitute(Substitute(Substitute(<日付入力正規化"明治","M"),"大正","T"),"昭和","S"),"平成","H"),"令和","R")
省17

580: 568 2019/05/19(日)00:17 AAS
自分の用途は生年月日の西暦化なので、これで問題ないのですが、
月日だけ入力した時に入力時の年を自動で付加する機能が無いとクレームが出ると予想される際は
If関数でWordCount（Substitute(Middle(<日付テキスト>,1,10),"/"," ")）=2の時はYear(Today)を付けるようにすれば良いかな?

あと上述の20年ものXPマシンがいつ死んでも良いよう、Windows10のPCも予備で抑えてるんですが
6.0Jのヘルプが開けない問題も↓で解決して、末永く6.0Jが使えそうです
https://moondoldo.com/DoldoWorkz/?Windows10%E7%94%A8WinHlp32.exe%E3%82%A4%E3%83%B3%E3%82%B9%E3%83%88%E3%83%BC%E3%83%AB%E3%83%90%E3%83%83%E3%83%81%E3%83%95%E3%82%A1%E3%82%A4%E3%83%AB

上下前次1-新書関写板覧索設栞歴

ｽﾚ情報赤ﾚｽ抽出画像ﾚｽ抽出歴の未読ｽﾚ AAｻﾑﾈｲﾙ

ぬこの手ぬこTOP 1.421s*