user form で command button を作成click時に保存したい
早速下記のように行ってみたがMy Documents の abcにアクセスできない
とエラー表示
Private Sub CommandButton1_Click()
Dim foldnm As String
foldnm = "D:\My Documents\abc\" '←ここにフォルダ名を記述
ActiveWorkbook.SaveAs _
foldnm & Format(Now(), "ggge年mm月dd日-h時mm分") & ".xls"
End Sub