0

現在、複数選択コンボボックスを使用して、クエリのフィルターを指定しています (レポートを生成します)。

フォームがロードされたときにこれらの各コンボボックスにデフォルト値を指定したいという事実を除けば、すべて正常に機能しています。

プロパティ パネルで組み込みのデフォルト ボックスを使用すると、複数の値が受け入れられないようです (または、複数の値を指定する方法がわかりません)。

Selectedコントロールのプロパティを使用して、実行時に必要な値を選択しようとしました:

For i = 0 To Me.MyComboBox.ListCount - 1
    Me.MyComboBox.Selected(i) = True
    Debug.Print Me.MyComboBox.Selected(i)      'Returns false
Next i

しかし、残念ながらそれはうまくいきません。エラーなどは発生しませんが、設定しても値が変わらないようです。

これを達成する方法について誰か考えがありますか？基本的に、コンボボックス内のすべての値を選択する各コンボボックスの横に「すべて」ボタンを配置したいので、できれば問題へのVBAアプローチが最も役立ちます。

どんな助けでも大歓迎です

4

1 に答える 1

1

Selectedプロパティを設定する前に、次を追加します。

MyCombobox.SetFocus
MyCombobox.ListIndex = 0
于 2013-06-17T07:41:02.117 に答える