|
いつもお世話になっています。
Access2003を使用しています。
フォームに年月日を手入力ができるテキストボックスを作りました。
このテキストボックスをダブルクリックすることでカレンダーが表示され、更に日付をダブルクリックすることで、該当の日にちが入力できるようにしました。
Private Sub カレンダー_DblClick()
DoCmd.SelectObject acForm, "サービスフォーム", False
Forms!サービスフォーム!受注日 = Me.カレンダー.Value
DoCmd.Close acForm, "カレンダー"
End Sub
しかし、実際のフォームには4つの日付入力欄「受注日」「発注日」「入荷日」「出荷日」があり、私の頭ではカレンダーコントロールを4つ作り(例えばカレンダー1、カレンダー2・・・等)、それぞれに対応させるくらいの力量しかありません。
ひとつのカレンダーコントロールでそれぞれの日付を入力することが可能だと思いますが、簡単にできるようであればご教授ください。
尚、テキストボックスをダブルクリックするとカレンダーが表示される方法は、マクロを使用して開くようにしています。
出張のため返信は遅れますが、よろしくお願いいたします。
|
|