Excleマクロ セル値の代入と文字列の結合について

"A1"セルの値に日付(仮：2022/10/1)が入っている別のExcelブックから、
この"A1"セル値を代入し、かつ隣(同セル内)に"付"という文字列を入れるマクロを作ったのですが、2022/10/1付　としたいのが、2022/10/01付　となってしまいます。
以下のようにVBAを書いたのですが、どうやったら、2022/10/1付と入力できるのか、
ご教示願います。

Dim Wb1 As Workbook
Dim Wb2 As Workbook
Set Wb1 = ThisWorkbook
Workbooks.Open fileName:=ThisWorkbook.Path & "\TEST1.xlsx"
Set Wb2 = ActiveWorkbook
Wb1.Sheets("Sheet1").Range("A1").Value _
= Wb2.Sheets("Sheet1").Range("A1").Value & "付"

質問者からの補足コメント

• 勘違いしていました。
  セルの書式設定でユーザー定義にyyyy/m/d"付"したうえで、
  マクロを実行していました。
  質問で書かせて頂いたようなマクロはどうしても必要です。日付情報が別エクセルから取る処理が必要なので

  No.2の回答に寄せられた補足コメントです。 補足日時：2022/10/05 17:10

No.3 ベストアンサー 回答者： t_fumiaki 回答日時： 2022/10/05 17:09

Wb2.Sheets("Sheet1").Range("A1").Value & "付"

↓

format(Wb2.Sheets("Sheet1").Range("A1").Value,"yyyy/m/d") & "付"

この回答へのお礼

正常に入力ができました。
ありがとうございました。

お礼日時：2022/10/05 17:15

No.2 回答者： banzaiA 回答日時： 2022/10/05 17:02

#1です。

ごめんなさい。
セルの書式設定でユーザー定義に
yyyy/m/d"付"
ではだめですか。

この回答へのお礼

ご回答いただきありがとうございます。
セルの書式設定でユーザー定義に
yyyy/m/d"付"
しましたが、だめでした。

お礼日時：2022/10/05 17:06

No.1 回答者： banzaiA 回答日時： 2022/10/05 16:57

それってVBAでないとだめですか。

セルの書式設定でユーザー定義に
yyyy/m/d
ではだめですかねぇ。