Форум программистов, компьютерный форум, киберфорум
VBA
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.71/56: Рейтинг темы: голосов - 56, средняя оценка - 4.71
2 / 2 / 0
Регистрация: 31.01.2010
Сообщений: 71

Несколько столбцов в listbox

21.08.2010, 20:21. Показов 11256. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Не получается вывести два столбца со значениями в listbox

вот код

Visual Basic Скопировано
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
Private Sub ComboBox1_Change()
Application.ScreenUpdating = False
Dim sh As Worksheet
Dim path, list, cena, k, cat, mat, vid, ed
 
For k = 4 To Worksheets("настройки").Range("A200").End(xlUp).Row
    
If Worksheets("настройки").Cells(k, 1) <> "" Then
 
        path = Worksheets("настройки").Cells(k, 1).Value
        list = Worksheets("настройки").Cells(k, 2).Value
 
    Set sh = GetObject(path).Sheets(list)
    Dim dia As String
    
   'список наименование и цена
  cat = Worksheets("настройки").Cells(k, 3).Value
  
  If ComboBox1.Value = sh.Range(cat).Value Then
  
  dia = Worksheets("настройки").Cells(k, 4).Text
  cena = Worksheets("настройки").Cells(k, 5).Text
  ed = Worksheets("настройки").Cells(k, 6).Text
  mat = Worksheets("настройки").Cells(k, 8).Text
  vid = Worksheets("настройки").Cells(k, 9).Text
   
 
ListBox1.AddItem ""
 
ListBox1.list(0, 0) = dia?????? 
ListBox1.list(0, 1) = cena??????
ListBox1.ColumnCount = 2
 
 
  ListBox2.AddItem mat
  ListBox3.AddItem vid
  ListBox4.AddItem ed
 
   
  End If
 
     Else
  End If
  
 Next k
sh.Parent.Close (False)
End Sub
дело в том, что в листбокс должны попасть значения диапазона! по пути листа настройка.
на листе настройка в ячейках находятся только значения
dia = A1:A20
cena= C1:C20

всю голову сломал

если делать просто listbox1.list=sh.Range(dia).value
то в нем выводится список!

как сделать второй столбец в этом же листбоксе для значения sh.Range(cena).value ???
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
21.08.2010, 20:21
Ответы с готовыми решениями:

ListBox в несколько столбцов
Здравствуйте! На форме имеется компонент ListBox, который содержит 255 элементов. Могу ли я их выводить в несколько рядов, а не один?...

Как сделать ListBox в несколько столбцов?
Есть задача требующая создать на форме поле, аналогичное такому: скрин взял от балты в сети... Как создать такое поле и вести в...

Управление шириной столбцов в многоколоночном ListBox(e)
Уважаемые коллеги, здравствуйте! Подскажите, пожалуйста, можно ли управлять шириной столбцов при заполнении многоколоночного Lixtbox(a)?

1
2 / 2 / 0
Регистрация: 31.01.2010
Сообщений: 71
22.08.2010, 20:31  [ТС]
Решил задачу сам!

разнес значения на листе настройка по ячейкам
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
22.08.2010, 20:31
Помогаю со студенческими работами здесь

listbox можно ли менять ширину столбцов?
можно ли менять ширину столбцов у listboxa? т.е делать его с колонками разной ширины?

Несколько Multiple Listbox
Привет всем. Простая с виду задача. На страничке ASP имеется НЕСКОЛЬКО listbox с возможность выбора НЕСКОЛЬКИХ пунктов сразу. Как...

ListBox в несколько строк.
Подскажите, пожалуйста, как сделать так, чтобы, если элемент в ListBoxе не помещается горизонтально, переносился на следующую строку, но,...

Заполнить несколько ListBox
Всем добрый день! При создании UserForm возникла острая необходимость сделать множество ListBox (на данный момент их 15). Заполнить...

Заполнить Listbox значениями одного из столбцов листа
Дан код : Private Sub UserForm_Initialize() ListBox1.ColumnWidths = &quot;160;70;100;230&quot; i = Sheets(&quot;Учет реализации...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Миграция монолита в Event-Driven микросервисную архитектуру на C#
stackOverflow 11.04.2025
Монолитная архитектура – классический подход к разработке программного обеспечения. Это приложение, построенное как единое целое, где все компоненты тесно связаны между собой. Большинство проектов. . .
Go в Kubernetes: Управление ресурсами
golander 11.04.2025
Разработчики Go-приложений в Kubernetes часто сталкиваются с неожиданными проблемами производительности и даже внезапными отказами контейнеров. Причина этого кроется в особенностях взаимодействия. . .
Агрегаты и сущности в DDD микросервисах
Javaican 10.04.2025
Разработка современных программных систем часто приводит на распутье: монолит или микросервисы? Даже при выборе микросервисной архитектуры многие команды сталкиваются с проблемой правильного. . .
Многопоточность в C#: Task и параллельное программирование
UnmanagedCoder 10.04.2025
Современные процессоры уже давно перестали наращивать тактовую частоту в пользу увеличения количества ядер. Это создало интересную ситуацию: разработчики, привыкшие к последовательному. . .
Линейное решение нелинейной задачи будет иметь приблизительный результат вычисления для метода обработки данных из double buffering.
Hrethgir 10.04.2025
Вообще изначально я пренебрёг квадратурой числа, но потом понял, что для вычисления приблизительного значения - сгодится, формулу можно будет корректировать по ходу. Это потому что прямое соотношение. . .
Переменные в Python
py-thonny 10.04.2025
Переменная в программировании — это символическое имя, связанное с областью памяти, в которой хранится значение. Она позволяет получать доступ к данным через понятные человеку идентификаторы, а не. . .
Многопоточность в C#: Task и асинхронные операции
UnmanagedCoder 10.04.2025
Многопоточность позволяет выполнять несколько операций одновременно, что важно для решения двух основных задач: повышения скорости выполнения вычислительно-сложных операций и сохранения отзывчивости. . .
Запуск контейнеров Docker на ARM64
Mr. Docker 09.04.2025
Появление таких решений, как Apple M1/ M2, AWS Graviton, Ampere Altra и Raspberry Pi, сделало использование ARM-систем обыденностью для многих разработчиков и DevOps-инженеров. При этом Docker,. . .
Vue SFC компонент на PHP с Fusion
Jason-Webb 09.04.2025
PHP на сервере и JavaScript на клиенте — классическое сочетание, которое, несмотря на свою эффективность, создает определенный когнитивный диссонанс при разработке. В этом контексте появляются. . .
TypeScript vs JavaScript: Отличия и когда что использовать
Reangularity 09.04.2025
JavaScript появился в 1995 году как творение Брендана Эйха и быстро стал основой интерактивности в вебе. За свою историю он прошел путь от простого языка для манипуляций с DOM до полноценной. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru
Выделить код Копировать код Сохранить код Нормальный размер Увеличенный размер