[[20080219152903]]　『カレンダーツールを使用したい』（我輩）　ページの最後に飛ぶ

『カレンダーツールを使用したい』（我輩）

 カレンダーツールを使用したいのですが、
 VBE画面の[ツール]メニュー [その他のコントロール]をクリック出来ません。
 その他のコントロールがしらけてます。
 Windows XPの「プログラムの追加と削除」のところからMicrosoft Office2003の
 機能追加で行うのではないかと思うのですが、それらしいのが見つかりません。
 どうしたら良いでしょうか？

 一度ユーザーフォームを挿入してみてください。
 その他のコントロールが有効になります。

 ただ、アクセスがないとカレンダーコントロール
 は使えなかったと思います。

 参考ＨＰです。

http://www.h3.dion.ne.jp/~sakatsu/

 (MARBIN)

MARBINさんおかげでカレンダーの表示日付の取得が出来ました。

 カレンダーを表示した時に今日の日付になっていません。
 どうすれば良いでしょうか？

 Sub test()
 UserForm1.Show
 End Sub

 Private Sub CommandButton1_Click()
 Dim date1 As Date
 date1 = Me.Calendar1.Value
 Range("a1") = date1
 Unload Me   
 End Sub

 私自身はアクセスを持ってないのでカレンダーコントロールは
 使えません。
 識者のレスをお待ち下さい。
 (MARBIN)

 Initializeイベントなどで今日の日付をセットすればよいと思います。
 Me.Calendar1.Value = Date
 (ROUGE)

有り難う御座いました（我輩）

コメント返信：

[ 一覧(最新更新順) ]

[[20080219152903]] 『カレンダーツールを使用したい』（我輩） ページの最後に飛ぶ

[[20080219152903]]　『カレンダーツールを使用したい』（我輩）　ページの最後に飛ぶ