| |
▼UO3 さん：
お忙しい中、ご返事ありがとうございます。
>｢あ｣なら｢あ｣が連続しています。（とびとびのデータは想定していません）
>テストデータとしては、そのほかにＢ，Ｃ，Ｄ列にデータを配置しています。
エクセルのシート１の表は、ご指示にしたがって
.....A.....B.....C.....D
1...検索..氏名...年齢...住所
2...あ....安部...35.....東京都
3...あ....
:
このような表にしています。
B列はリストに出ますが、C・D列は表示されません。
表に問題あるでしょうか
With Sheets("Sheet1") 'リストがあるシート名
For i = f To t
tbl(i - f + 1, 1) = .Cells(i, "B").Value 'リストの１列目にB列を
tbl(i - f + 1, 2) = .Cells(i, "C").Value 'リストの１列目にC列を
tbl(i - f + 1, 3) = .Cells(i, "D").Value 'リストの１列目にD列を
Next
End With
このコード上ではB・C・D列の１行ずつ拾っていることが、ステップインで確認できていますが。
最後の表示ではリストボックス１では１列（A列）だけになります。
スピンボタンは、うまく連動していて感心しています、ありがとうございます
それから、A列に例えば「あ」を埋めると、体裁がいまいちですので、一つだけにすることはできませんでしょうか。
急ぎませんので、お時間が許せば、回答をお願いします。
|
|
Ｊｔｏ
- 12/1/27(金) 10:19 -
