事務職員のPower Automate Desktopやってみた～【コードを共有します】変数・日時編～

事務職員のPower Automate Desktopやってみた～変数・日時編～で紹介したフローのコードを共有します。
以下コードをコピーし、ご自身のフローに貼り付けてご利用ください。
また、フローの共有方法は↓こちらを参考にしてください。
事務職員のPower Automate Desktopやってみた～フローのコピー・他人との共有編～

1.日時の変数一覧

No.	日時	例（2022/2/6の値）
1	現在の日時	2/6/2022 9:45:09 PM
2	現在の日時（令和）	2/6/0004 9:45:09 PM
3	今月	2
4	先月	1
5	現在の日時（年度）	2/6/2021 9:45:09 PM
6	現在の日時（年度）（令和）	2/6/0003 9:45:09 PM
7	今月初め	2022/2/1
8	今月初め（令和）	4/2/1
9	先月初め	2022/1/1
10	先月初め（令和）	4/1/1
11	先月末	2022/1/31
12	先月末（令和）	4/1/31
13	今年	2022
14	今年（令和）	4
15	今年度	2021
16	今年度（令和）	3
17	去年	2021
18	去年（令和）	3
19	昨年度	2020
20	昨年度（令和）	2
21	今年度（令和）（R付き）	R3
22	今月（月付き）	2月
23	先月（月付き）	1月
24	今月初め（令和）（Y.M.D）	4.2.1
25	先月初め（令和）（Y.M.D)	4.1.1

2.コード（こちらをコピペください。）

/# ★★★★★★★★★★★★★★★★★★★★★★★
★　１　現在の日時：CurrentDateTime　 ★
★★★★★★★★★★★★★★★★★★★★★★★

#/
DateTime.GetCurrentDateTime.Current DateTimeFormat: DateTime.DateTimeFormat.DateAndTime Offset: $'''Asia/Tokyo''' CurrentDateTime=> CurrentDateTime
/# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
★　２　現在の日時（令和）：CurrentDateTimereiwa ★
★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★

#/
DateTime.Add DateTime: CurrentDateTime TimeToAdd: -2018 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> CurrentDateTimereiwa
/# ★★★★★★★★★★★★★
★　3　今月：month ★　
★★★★★★★★★★★★★

#/
SET month TO CurrentDateTime.Month
/# ★★★★★★★★★★★★★★
★　4　先月：sengetu ★
★★★★★★★★★★★★★★

#/
DateTime.Add DateTime: CurrentDateTime TimeToAdd: -1 TimeUnit: DateTime.TimeUnit.Months ResultedDate=> sengetuDateTime
SET sengetu TO sengetuDateTime.Month
/# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
★　5　現在の日時（年度）：CurrentDateTimenendo ★
★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★

#/
IF month >= 4 THEN
DateTime.Add DateTime: CurrentDateTime TimeToAdd: 0 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> CurrentDateTimenendo
END
IF month <= 3 THEN
DateTime.Add DateTime: CurrentDateTime TimeToAdd: -1 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> CurrentDateTimenendo
END
/# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
★　6　現在の日時（年度）（令和）：CurrentDateTimenendoreiwa　★
★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★

#/
IF month >= 4 THEN
DateTime.Add DateTime: CurrentDateTimereiwa TimeToAdd: 0 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> CurrentDateTimenendoreiwa
END
IF month <= 3 THEN
DateTime.Add DateTime: CurrentDateTimereiwa TimeToAdd: -1 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> CurrentDateTimenendoreiwa
END
/# ★★★★★★★★★★★★★★★★★★
★　7　今月初め：gessyobitext ★
★★★★★★★★★★★★★★★★★★

#/
SET gessyobitext TO $'''%CurrentDateTime.Year%/%CurrentDateTime.Month%/1'''
/# ★★★★★★★★★★★★★★★★★★★★★★★★★★
★　8　今月初め（令和）：gessyobireiwatext ★
★★★★★★★★★★★★★★★★★★★★★★★★★★

#/
SET gessyobireiwatext TO $'''%CurrentDateTimereiwa.Year%/%CurrentDateTimereiwa.Month%/1'''
/# ★★★★★★★★★★★★★★★★★★★★★★
★　9　先月初め：sengetuhajimetext ★
★★★★★★★★★★★★★★★★★★★★★★#/
DateTime.Add DateTime: gessyobitext TimeToAdd: -1 TimeUnit: DateTime.TimeUnit.Months ResultedDate=> sengetuhajimeDateTime
SET sengetuhajimetext TO $'''%sengetuhajimeDateTime.Year%/%sengetuhajimeDateTime.Month%/1'''
/# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
★　10　先月初め（令和）：sengetuhajimereiwatext　★
★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★#/
DateTime.Add DateTime: sengetuhajimeDateTime TimeToAdd: -2018 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> sengetuhajimereiwaDateTime
SET sengetuhajimereiwatext TO $'''%sengetuhajimereiwaDateTime.Year%/%sengetuhajimereiwaDateTime.Month%/1'''
/# ★★★★★★★★★★★★★★★★★★★★
★　11　先月末：sengetumatutext ★
★★★★★★★★★★★★★★★★★★★★
#/
DateTime.Add DateTime: gessyobitext TimeToAdd: -1 TimeUnit: DateTime.TimeUnit.Days ResultedDate=> sengetumatuDateTime
SET sengetumatutext TO $'''%sengetumatuDateTime.Year%/%sengetumatuDateTime.Month%/%sengetumatuDateTime.Day%'''
/# ★★★★★★★★★★★★★★★★★★★★★★★★★★
★　12　先月末（令和）：sengetumatureiwa　★
★★★★★★★★★★★★★★★★★★★★★★★★★★
#/
DateTime.Add DateTime: sengetumatuDateTime TimeToAdd: -2018 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> sengetumatureiwaDateTime
SET sengetumatureiwatext TO $'''%sengetumatureiwaDateTime.Year%/%sengetumatureiwaDateTime.Month%/%sengetumatureiwaDateTime.Day%'''
/# ★★★★★★★★★★★★★
★　13　今年：year　★
★★★★★★★★★★★★★#/
SET year TO CurrentDateTime.Year
/# ★★★★★★★★★★★★★★★★★★★★
★　14　今年（令和）：yearreiwa ★
★★★★★★★★★★★★★★★★★★★★

#/
SET yearreiwa TO CurrentDateTimereiwa.Year
/# ★★★★★★★★★★★★★★★
★　15　今年度：nendo　★
★★★★★★★★★★★★★★★

#/
SET nendo TO CurrentDateTimenendo.Year
/# ★★★★★★★★★★★★★★★★★★★★★★★
★　16　今年度（令和）：nendoreiwa　 ★
★★★★★★★★★★★★★★★★★★★★★★★

#/
SET nendoreiwa TO CurrentDateTimenendoreiwa.Year
/# ★★★★★★★★★★★★★★
★　17　去年：kyonen ★
★★★★★★★★★★★★★★

#/
DateTime.Add DateTime: CurrentDateTime TimeToAdd: -1 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> kyonenDateTime
SET kyonen TO kyonenDateTime.Year
/# ★★★★★★★★★★★★★★★★★★★★★
★　18　去年（令和）：kyonenreiwa ★
★★★★★★★★★★★★★★★★★★★★★

#/
DateTime.Add DateTime: CurrentDateTimereiwa TimeToAdd: -1 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> kyonenDateTimereiwa
SET kyonenreiwa TO kyonenDateTimereiwa.Year
/# ★★★★★★★★★★★★★★★★★★
★　19　昨年度：sakunendo　 ★
★★★★★★★★★★★★★★★★★★

#/
DateTime.Add DateTime: CurrentDateTimenendo TimeToAdd: -1 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> kyonenDateTimenendo
SET sakunendo TO kyonenDateTimenendo.Year
/# ★★★★★★★★★★★★★★★★★★★★★★★★★
★　20　昨年度（令和）：sakunendoreiwa ★
★★★★★★★★★★★★★★★★★★★★★★★★★

#/
DateTime.Add DateTime: CurrentDateTimenendoreiwa TimeToAdd: -1 TimeUnit: DateTime.TimeUnit.Years ResultedDate=> kyonenDateTimenendoreiwa
SET sakunendoreiwa TO kyonenDateTimenendoreiwa.Year
/# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
★　21　今年度（令和）（R付き）：Rnendoreiwatext ★
★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★#/
Text.FromNumber Number: nendoreiwa DecimalPlaces: 0 UseThousandsSeparator: False FormattedNumber=> nendoreiwatext
Text.JoinText.Join List: $'''R%nendoreiwatext%''' Result=> Rnendoreiwatext
/# ★★★★★★★★★★★★★★★★★★★★★★★★
★　22　今月（月付き）：monthgatutext ★
★★★★★★★★★★★★★★★★★★★★★★★★
#/
Text.FromNumber Number: month DecimalPlaces: 0 UseThousandsSeparator: False FormattedNumber=> monthtext
Text.JoinText.Join List: $'''%monthtext%月''' Result=> monthgatutext
/# ★★★★★★★★★★★★★★★★★★★★★★★★★
★　23　先月（月付き）：sengetugatutext ★
★★★★★★★★★★★★★★★★★★★★★★★★★
#/
Text.FromNumber Number: sengetu DecimalPlaces: 0 UseThousandsSeparator: False FormattedNumber=> sengetutext
Text.JoinText.Join List: $'''%sengetutext%月''' Result=> sengetugatutext
/# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
★　24　今月初め（令和）（Y.M.D）：gessyobireiwaYMDtext ★
★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
#/
Text.ConvertDateTimeToText.FromCustomDateTime DateTime: gessyobireiwatext CustomFormat: $'''y.M.d''' Result=> gessyobireiwaYMDtext
/# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
★　25　先月初め（令和）（Y.M.D)：sengetuhajimereiwaYMDtext ★
★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★

#/
Text.ConvertDateTimeToText.FromCustomDateTime DateTime: sengetuhajimereiwatext CustomFormat: $'''y.M.d''' Result=> sengetuhajimereiwaYMDtext

3.イメージ

　はじめだけですが、以下のようなフローができます。