Главная страница > Вопрос
Вопрос
как в Listbox вставить Excel таблицу? имеется в виду ту таблицу в документе которой отрыт VBA.
excel | listbox | VBA | компьютеры 18.11.09 Автор: Jo0keR
Ответы
1 из 2
для начала определитесь, что хотите сделать. Листбокс вполне определенного вида объект, туда таблицу просто так не вставишь. Да и таблица таблице рознь. Есть таблицы в 10 столбцов, есть в 100, есть сводные, сложные по форме и т.д.
19.11.09 Автор: oldTV
2 из 2
Добавь к проекту форму. На форму добавь следующие элементы:
- ListBox1
- CommandButton1
- RefEdit1 (если этот элемент не доступен, его нужно добавить: Tools/References/ и поставить галочку напротив Ref Edit Control.

Добавь обработку события клика на кнопке:

Private Sub CommandButton1_Click()
   Dim r As Range
   Dim Addr  As String
   'Получаем адрес таблицы
   Addr = Me.RefEdit1.Value
   'Если адрес не введен - сообщение
   If Addr = "" Then
       MsgBox "Пожалуйста, выделите диапазон!"
   Else
       'Очищаем список
       Me.ListBox1.Clear
       'Устанавливаем ссылку на выбранную таблицу
       Set r = Range(Addr)
       'Устанавливаем кол-во столбцов в выбрвнной таблице
       Me.ListBox1.ColumnCount = r.Columns.Count
       'Переносим таблицу в ListBox
       Me.ListBox1.RowSource = r.Address
   End If
End Sub


Have a fun!
19.11.09 Автор: LeoCats
Это может быть интересно
Есть таблица excel в которой надо упорядочить значения
Как в C++ осушествить доступ к таблице Excel или Acces
Вопрос по Excel 2007
как открыть справочники и таблицы в формате XML
Возможно ли из Excel вытянуть значения в таблицу HTML?
Войти
Просмотреть Вопросы и ответы в версии: для мобильных устройств | для ПК
©2014 Google - Политика конфиденциальности - Справка