テキストの数字を指定数取り出して数値に変換

コードを右から7文字取り出して数値に変換する
Val(Right([コード],7))

Val 文字列に含まれる数値を数値に変換
CByte データをバイト型に変換
CDbl データを倍精度浮動小数点型に変換
CDnt データを整数型に変換
CDate データを日付型に変換
CStr データをテキスト型に変換
Str 数値を文字列に変換


しまった！健忘帳blogと間違えた！

キャンセル料を代入

IIf([キャンセル日]>=[キャンセル100%発生日],[設定会費],IIf([キャンセル日]>=[キャンセル50%発生日], Int([設定会費]*0.5), 0))

汎用性があるかもなので覚えて貼っとく


あぁまたこっちにUPしちゃった・・・
切り替えたはずなのになぁ・・・

たぶん まだ肺炎は完治していないのだろう

コロナの受診基準が変更になり
うちの会社の安全衛生基準も
37.5度以上から平熱より1度高熱の場合に変更になった。
平熱とは最近1週間の平均体温との注釈付き。
さらに、出勤前だけでなく会社からの帰宅時の2回検温報告となった。

4月からマイコプラズマ肺炎の私。
それ以前の平熱は35.4度であるが
会社基準とされるここ最近の平熱は36.5度っす。
んで、さっき検温したら36.7度なのよねぇーーー。

背中も痛いし
気管のゼロゼロ感も酷くなってるし
マイコプラズマ肺炎が完治してないと思われる。
だけど大袈裟にしたくないから受診できない小心者なのよねぇ。

週３日の在宅勤務中になし崩し的に完治しないかなぁ