Excel VBA質問箱 IV

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

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


30631 / 76732 ←次へ | 前へ→

【51366】Re:コンボボックスのリストがイッパイ。
質問  すず  - 07/9/13(木) 14:26 -

引用なし
パスワード
   ▼Jaka さん:

おぉ、そういうことなのですね。
ThisWorkbookのところに入れてみました。
しかし、オブジェクトが必要と怒られました。

Private Sub Workbook_Open()

  Dim i As Integer, k As Integer
  
  For i = 1 To 12
    コンボ1.AddItem i
  Next

  For i = 1 To 12
    コンボ2.AddItem i
  Next
  
  For i = 1 To 12
  For k = 1 To 5
    コンボ3.AddItem i & "月/" & k
  Next
  Next

End Sub

書きすぎですか?


>▼すず さん:
>>Private Sub Worksheet_Open()
>こういうのはないです。
>
>ichinoseさんが書かれたものをよく読んでね。
>>シートに貼り付けたものならば、
>> ブックを開いた時に、(Thisworkbookのモジュールのworkbook_open())
1 hits

【51356】コンボボックスのリストがイッパイ。 すず 07/9/12(水) 23:45 質問
【51357】Re:コンボボックスのリストがイッパイ。 ichinose 07/9/13(木) 8:35 発言
【51364】Re:コンボボックスのリストがイッパイ。 すず 07/9/13(木) 11:32 質問
【51365】Re:コンボボックスのリストがイッパイ。 Jaka 07/9/13(木) 12:44 発言
【51366】Re:コンボボックスのリストがイッパイ。 すず 07/9/13(木) 14:26 質問
【51367】Re:コンボボックスのリストがイッパイ。 Blue 07/9/13(木) 14:46 回答
【51368】Re:コンボボックスのリストがイッパイ。 すず 07/9/13(木) 15:07 質問
【51369】Re:コンボボックスのリストがイッパイ。 Jaka 07/9/13(木) 15:17 発言
【51371】Re:コンボボックスのリストがイッパイ。 Blue 07/9/13(木) 15:24 発言
【51372】Re:コンボボックスのリストがイッパイ。 Jaka 07/9/13(木) 15:39 発言
【51370】Re:コンボボックスのリストがイッパイ。 Blue 07/9/13(木) 15:21 回答
【51393】Re:コンボボックスのリストがイッパイ。 すず 07/9/14(金) 13:05 お礼

30631 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free