VBA 前月を数字2桁で表示する方法について

Question

事務職にてデータ集計用Excelマクロを組んでおります。

シート名を「2021年02月度xxx集計」のように表記するために
下記のように記述しましたが、前月の数字を返す方法に行き詰まってしまいました。

Sheets("Sheet1").Name = (Format(Now, "yyyy年")) & (Format(Month(-1), "mm月")) & "度xxx集計"

現在が3月ならば、3月中の集計で月の部分を「02月」と表示できればいいのですが
上記だと必ず「2021年01月度xxx集計」と表示されてしまいます。

前月を2桁で表記するには、どのような記述がベストでしょうか？
ご教示頂けますと幸いです。
よろしくお願いいたします。

Answer 1

下記でしょうか。

Sheets("Sheet1").Name = Format(DateAdd("m", -1, Date), "yyyy年mm月度xxx集計")

Comments

[Keith]

hatena19 様
ご教示の通りに記述し、意図したとおりに反映致しました。
全体をすっきりとまとめて頂いて、ありがとうございます。こちらもぜひ活用して参りたいと思います。
ご回答頂き、ありがとうございます。

[jinoji]

確かに1月に動かすときには年も昨年にしたいはずなので、それが良さげですね。
細かいことをいうと、
Format(DateAdd("m", -1, Date), "yyyy年mm月度") & "xxx集計"
の方が安全かもしれません。
xxxの部分に、Format関数で使われるアルファベットが入ると
（たとえば「Monthly集計」のような場合）その部分まで置き換わってしまうからです。

[Keith]

ご両名様とも大変に有用なアドバイスを頂戴し、大変にありがとうございました。
とても有り難いご回答でしたが、ベストアンサーは最初にご回答頂きましたjinoji様へとつけさせて頂きました。良いお知恵をお貸し頂き、ありがとうございました。

Answer 2

これでどうでしょうか。

Format(Month(DateAdd("m", -1, Now())), "00月")

Comments

[Keith]

jinoji 様
ご教示の通りに記述し、意図したとおりに反映致しました。
Monthの該当部分をご丁寧にまとめて頂きありがとうございます。ご教示頂きました通り、活用して参ります。
早速にご回答頂き、ありがとうございます。