11

重複の可能性:
複数の列を持つリストボックスにアイテムを追加する

MFC VC++ には、 と の 2 つのコントロールがListBoxありListCtrlます。しかし、VBA ではListBox.

2 つの列 (Company_ID、Company_Name) を持つリストボックスを作成したいと考えています。

これが私が試したものです：

  1. lstbox(コントロール型ListBox)を作成しました
  2. 値のソースの種類 = 値の一覧
  3. 私は2つの編集ボックスからユーザーから値を取得しています。ユーザーが「追加」をクリックすると、2列のリストボックスに追加されます。

VBA コード ルーチンに、次の行を追加しました。

lstbox.ColumnCount = 2
lstbox.AddItem (Company_ID)

列値の追加に関連していると思われる次のコードは機能していません。

lstbox.Column(1,lstbox.ListCount - 1) = Company_name

これによりエラーが発生します：

ランタイム エラー '424' オブジェクトが必要です。

複数列のリストボックスに追加するVBAコードを手伝ってくれる人はいますか。

4

1 に答える 1

37

簡略化された例 (カウンターあり):

With Me.lstbox
    .ColumnCount = 2
    .ColumnWidths = "60;60"
    .AddItem
    .List(i, 0) = Company_ID
    .List(i, 1) = Company_name 
    i = i + 1

end with

リストボックスを埋めるために、必ず 1 ではなく0でカウンターを開始してください。

于 2012-06-27T08:43:01.677 に答える