Excel VBA質問箱 IV

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

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


10678 / 13646 ツリー ←次へ | 前へ→

【20442】ユーザーフォームのコード mickeypapa 04/12/9(木) 12:12 質問[未読]
【20472】Re:ユーザーフォームのコード [名前なし] 04/12/9(木) 22:20 回答[未読]
【20483】Re:ユーザーフォームのコード mickeypapa 04/12/10(金) 7:25 お礼[未読]

【20442】ユーザーフォームのコード
質問  mickeypapa WEB  - 04/12/9(木) 12:12 -

引用なし
パスワード
   初心者の私が、少しずつコードを覚え始めて
少々気になり始めたことなのですが、
ユーザーフォームにコンボボックスを複数配置して
コンボボックスにアイテム(配列)を指定する方法
について、
1.
Private Sub UserForm_Initialize()
Dim myAr1 As Variant


Dim myAr5 As Variant

myAr1 = Worksheets("sheet1").Range("A2:A8")


myAr5 = Worksheets("sheet1").Range("F2:F8")

With ComboBox1
  .List = myAr1
End With



2.
Private Sub UserForm_Initialize()

With ComboBox1
  .List = Worksheets("sheet1").Range("A2:A8").Value
End With

1.と2.のコードの書き方で、ユーザーフォームの表示やファイルサイズ
その他の違いは出てくるのでしょうか?
また、For i 1 To 5
のような書き方の方が、いいのでしょうか?

お手数ですが、アドバイス宜しくお願い致します。

【20472】Re:ユーザーフォームのコード
回答  [名前なし]  - 04/12/9(木) 22:20 -

引用なし
パスワード
   >1.と2.のコードの書き方で、ユーザーフォームの表示やファイルサイズ
>その他の違いは出てくるのでしょうか?

ご自分で試してみれば結果はわかると思います。
普段気にしたことはありませんが。

>また、For i 1 To 5
>のような書き方の方が、いいのでしょうか?

数が多くなれば、そちらのほうがいいでしょうね。

【20483】Re:ユーザーフォームのコード
お礼  mickeypapa WEB  - 04/12/10(金) 7:25 -

引用なし
パスワード
   ▼[名前なし] さん:
アドバイス有り難うございます。
コードを書き換えて際に(1→2)、気持ち?ユーザーフォームの
表示が早くなった気がしたものですから、錯覚かも知れませんが、
疑問に思ったので、こちらであえて質問させて頂きました。
有り難うございます。

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