Вывод данных из listbox - Microsoft Office Excel - Страница 4

doober · 24.07.2011, 11:25

Цитата:

Сообщение от СтаниславАВ

Спасибо. Попрактикуюсь. А ссылку на макрос Красный_свет или DimFirm указывать?

Красный_свет это не макрос.Это как бы дом для них.
А макрос например CreateDim -это его номер квартиры в этом доме
Его можно вызвать
Call Красный_свет.CreateDim
Красный_свет.CreateDim
CreateDim
Все зависит об общей обстановки

Надо бы сначала теорию почитать

СтаниславАВ · 24.07.2011, 11:38

Цитата:

Сообщение от doober

1 DimFirm имя модуля и одновременно имя переменной-красная карточка.
2 Уберите везде shHome.UsedRange
Далее не смотрел

Подскажи пожалуйста, а почему в файле stick это работает?

doober · 24.07.2011, 11:49

Set shHome = ThisWorkbook.Worksheets("Firms")
Имя модуля DimFirms
переменная Public DimFirm() As String

Set shHome = Intersect(Range("Данные_расходов"), .Columns("A:D"), .Rows("302:385"))
Имя модуля DimFirm
переменная Public DimFirm() As String

СтаниславАВ · 24.07.2011, 15:12

После неимоверных усилий и помощи добрых людей, сотворил следующее. Надо нажать на кнопку "Вставить ЖКУ"

СтаниславАВ · 24.07.2011, 15:17

Теперь осталось докумекать как это все вставить в эту таблицу...

. Буду думать как столбец "А" с листа "Данные", вставить в столбец "Р" листа "Расходы". Столбец "D" с листа "Данные", вставить в столбец "S" листа "Расходы". Надо ещё их ограничить, чтобы вводилось не больше 13 значений, а то таблица на листе "Расходы" содержит только 13 строк....

СтаниславАВ · 24.07.2011, 16:15

Не могу понять, почему услуги ЖКХ дублируются дважды....

СтаниславАВ · 24.07.2011, 18:12

При вводе расходов за жку в столбец D, данные дублируются дважды...

RAN. · 24.07.2011, 21:38

Станислав, вы нашли хороший макрос, но он значительно сложнее того, что требуется для решения вашей задачи.
Найдите что-нибудь попроще, разберитесь с ним, а потом можете вернуться к этому.
А с этим макросом так и будут одни вопросы....

24.07.2011, 11:49	#33
doober Старожил Регистрация: 02.05.2009 Сообщений: 3,907	Set shHome = ThisWorkbook.Worksheets("Firms") Имя модуля DimFirms переменная Public DimFirm() As String Set shHome = Intersect(Range("Данные_расходов"), .Columns("A:D"), .Rows("302:385")) Имя модуля DimFirm переменная Public DimFirm() As String Анализ,обработка данных Недорого

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Вывод из ListBox в Мемо	alekstav	Общие вопросы Delphi	11	25.08.2014 22:33
Вывод столбца из таблицы в ListBox	хомякec	БД в Delphi	7	03.05.2011 19:16
Вывод системных каталогов в ListBox	whiskey	Общие вопросы .NET	1	22.12.2010 09:28
Вывод построчно в listbox!	alexey_nv86	Microsoft Office Excel	11	07.11.2010 16:04
Вывод изображений из списка ListBox	ChEaTeR-abc	Помощь студентам	6	13.07.2010 16:55

24.07.2011, 15:17	#35
СтаниславАВ Форумчанин Регистрация: 10.10.2010 Сообщений: 107	Теперь осталось докумекать как это все вставить в эту таблицу... . Буду думать как столбец "А" с листа "Данные", вставить в столбец "Р" листа "Расходы". Столбец "D" с листа "Данные", вставить в столбец "S" листа "Расходы". Надо ещё их ограничить, чтобы вводилось не больше 13 значений, а то таблица на листе "Расходы" содержит только 13 строк....

24.07.2011, 18:12	#37
СтаниславАВ Форумчанин Регистрация: 10.10.2010 Сообщений: 107	При вводе расходов за жку в столбец D, данные дублируются дважды...

24.07.2011, 21:38	#38
RAN. Форумчанин Регистрация: 05.07.2011 Сообщений: 208	Станислав, вы нашли хороший макрос, но он значительно сложнее того, что требуется для решения вашей задачи. Найдите что-нибудь попроще, разберитесь с ним, а потом можете вернуться к этому. А с этим макросом так и будут одни вопросы....