![]() |
|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Новичок
Джуниор
Регистрация: 13.04.2011
Сообщений: 6
|
![]()
Здравствуйте.
У меня такая проблема: есть лист с некими данными. Требуется создать 4 коллекции (по количеству смен). Почему-то не получается "запихать" в коллекцию пользовательские типы данных. Код:
|
![]() |
![]() |
![]() |
#2 | |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
![]() Цитата:
Вместо пользовательских типов данных используйте классы - а экземпляры класса помещайте в коллекцию. |
|
![]() |
![]() |
![]() |
#3 |
Новичок
Джуниор
Регистрация: 13.04.2011
Сообщений: 6
|
![]()
А как этот код можно переписать с помощью классов? И как потом с ними работать?
|
![]() |
![]() |
![]() |
#4 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
![]()
Я в таких случаях сначала добавляю модуль класса примерно такого содержания:
(к примеру, назвал я этот класс NoticeFlat) Код:
(кодом из стандартного модуля) Код:
|
![]() |
![]() |
![]() |
#5 | |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
![]() Цитата:
К тому же, в вашем случае с массивами будет даже проще - либо используйте 4 двумерных массива, либо один 3-мерный. (в массивы можно добавлять элементы пользовательского типа) |
|
![]() |
![]() |
![]() |
#6 | |
Новичок
Джуниор
Регистрация: 13.04.2011
Сообщений: 6
|
![]() Цитата:
У меня была похожая ситуация год назад, но код дома на компе, а дома буду только в пятницу вечером. Там, насколько я помню, ситуацию разрешил, но вот как я это сделал - уже не помню. |
|
![]() |
![]() |
![]() |
#7 |
Новичок
Джуниор
Регистрация: 13.04.2011
Сообщений: 6
|
![]()
Мне в Вашем коде не понятна строчка
Код:
|
![]() |
![]() |
![]() |
#8 | ||
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
![]() Цитата:
Это диапазон ВЫДЕЛЕННЫХ ПОЛЬЗОВАТЕЛЕМ строк, за исключением строк 1 и 2 (строк заголовка) Цитата:
Код:
|
||
![]() |
![]() |
![]() |
#9 |
Новичок
Джуниор
Регистрация: 13.04.2011
Сообщений: 6
|
![]()
Получился следующий код:
Объявление класса Rec: Код:
Код:
ByRef argument type mismatch |
![]() |
![]() |
![]() |
#10 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,856
|
![]()
Перед строкой Set ra = Range([A5], Range("A" & Rows.Count).End(xlUp))
добавьте строку Код:
|
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Типы данных С++ | werser | Помощь студентам | 1 | 13.03.2010 18:34 |
Типы данных | psycho-coder | Паскаль, Turbo Pascal, PascalABC.NET | 6 | 04.02.2010 20:03 |
Типы данных | nedden | Помощь студентам | 2 | 12.11.2008 17:18 |
Типы данных??? | Рустам | Общие вопросы Delphi | 10 | 08.11.2007 08:03 |