Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12751 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【8838】コンボボックスに今日の日付を自動取得 ぴ〜ちゃん 03/11/5(水) 21:01 質問
【8842】Re:コンボボックスに今日の日付を自動取得 つん 03/11/5(水) 22:49 回答
【8843】Re:コンボボックスに今日の日付を自動取得 INA 03/11/5(水) 23:01 回答
【8846】Re:コンボボックスに今日の日付を自動取得 ぴ〜ちゃん 03/11/6(木) 0:08 質問
【8848】Re:コンボボックスに今日の日付を自動取得 つん 03/11/6(木) 0:19 回答
【8849】できましたぁ ぴ〜ちゃん 03/11/6(木) 0:50 お礼
【8838】コンボボックスに今日の日付を自動取得
質問  ぴ〜ちゃん  - 03/11/5(水) 21:01 -
引用なし
パスワード
   Userform1の中に年＝ComboBox1、月＝ComboBox2、日＝ComboBox3
と言うかんじで設定しているのですが、
自動で日付を取得できる方法を教えて頂けないでしょうか。
ＶＢＡ初心者です。宜しくお願いします。
【8842】Re:コンボボックスに今日の日付を自動取得
回答  つん E-MAIL  - 03/11/5(水) 22:49 -
引用なし
パスワード
   ぴ〜ちゃん さん、こんばんは

今日の日付の取得は

年は　Year(Date)
月は　Month(Date)
日は　Day(Date)

です。
こういうことでいいのかな？
【8843】Re:コンボボックスに今日の日付を自動取得
回答  INA  - 03/11/5(水) 23:01 -
引用なし
パスワード
   イベントは　UserForm_Initialize()　が良いと思います。
【8846】Re:コンボボックスに今日の日付を自動取得
質問  ぴ〜ちゃん  - 03/11/6(木) 0:08 -
引用なし
パスワード
   ありがとうございます。
フォームを表示させた時に、自動で今日の日付が
コンボボックスの中に入っててほしいのです。
マクロの組み方、構文がわからないほどの初心者で
すいません
【8848】Re:コンボボックスに今日の日付を自動取得
回答  つん E-MAIL  - 03/11/6(木) 0:19 -
引用なし
パスワード
   ぴ〜ちゃん さん

>ありがとうございます。
>フォームを表示させた時に、自動で今日の日付が
>コンボボックスの中に入っててほしいのです。
>マクロの組み方、構文がわからないほどの初心者で
>すいません

コンボボックスに値を設定するには、「AddItem」を使います。
こんな感じ。「年」だけね

Private Sub UserForm_Initialize()

　　ComboBox1.AddItem Year(Date)
　　ComboBox1.ListIndex = 0
　　　
End Sub

ところで、今日の日付だけをリストさせたいんですよね？
なんでコンボボックス？
コンボボックスって普通は、複数の候補をリストさせて、そこから選択させたりするためのものですよね？
よけいなことやかったかな？ちょっち気になったもので・・・
【8849】できましたぁ
お礼  ぴ〜ちゃん  - 03/11/6(木) 0:50 -
引用なし
パスワード
   つんさん、本当にありがとうございました。
コンボボックスの使い方ももう少し勉強してみます。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12751 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free