vbaでユーザ定義の日付を割り当てる方法

Question

ユーザが手作業で日付を入力し、後の段階で入力を利用するために、ユーザに日付を割り当てる必要があります。ユーザーがマニュアルの日付を挿入したときに、ファイル名の命名規則に使用する必要があります。 Ex football 20160601.xlsx

私はいくつかのウェブサイトを通過しましたが、私の要求に従って答えを見つけることができませんでした。

マイコード：

Sub date() 
    date_test = Now()  

     Range("A1") = Format(date_test, "mm.dd.yy") ' how to aassign this date as a user defined date(as manual date) something like msg box but not msgbox. 

    End date 

Answer 1

Dim inputDate as Date 
Date = Format(InputBox("Enter a Date", "Input"),"yyyy-mm-dd") 

このような何か？

Datepickerで希望の日付を選択する場合は、新しいuserformを作成し、 "Microsoft Date and Time Picker Control"（ツール - >追加コントロール）をフォームに追加します。それで、あなたはこのような値を使うことができます：Format(DatePicker1.Value,"yyyymmdd")