Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3652 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【60947】Combobox一覧 ART 09/3/26(木) 14:46 質問[未読]
【60948】Re:Combobox一覧 Jaka 09/3/26(木) 14:56 発言[未読]
【60947】Combobox一覧
質問  ART  - 09/3/26(木) 14:46 -
引用なし
パスワード
   ユーザーフォーム起動時にComboboxに
現在開いているファイルの一覧を記載するようにするために
下記のMacroを導入しました。

　　For Each WB In Workbooks
　　　　Me.ComboBox1.AddItem WB.Name
　　　　Me.ComboBox2.AddItem WB.Name
　　Next
実際に起動時には
book1.xls
book2.xls
の一覧が作成され問題なく使用できました。

これを利用し
Comboboxが変更された際にに同様に一覧を取り込もうとしたところ
book1.xls
book2.xls
book1.xls
book2.xls
book1.xls
book2.xls
book1.xls
book2.xls
book1.xls
book2.xls
と表示されてしまいました。
これをうまく回避する方法はないものでしょうか
【60948】Re:Combobox一覧
発言  Jaka  - 09/3/26(木) 14:56 -
引用なし
パスワード
   Me.ComboBox1.Clear
Me.ComboBox2.Clear
？？
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
3652 / 13646 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free