|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
13.04.2011, 09:28 | #1 |
Новичок
Джуниор
Регистрация: 13.04.2011
Сообщений: 6
|
Коллекции и пользовательские типы данных
Здравствуйте.
У меня такая проблема: есть лист с некими данными. Требуется создать 4 коллекции (по количеству смен). Почему-то не получается "запихать" в коллекцию пользовательские типы данных. Код:
|
13.04.2011, 09:41 | #2 | |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Цитата:
Вместо пользовательских типов данных используйте классы - а экземпляры класса помещайте в коллекцию. |
|
13.04.2011, 09:45 | #3 |
Новичок
Джуниор
Регистрация: 13.04.2011
Сообщений: 6
|
А как этот код можно переписать с помощью классов? И как потом с ними работать?
|
13.04.2011, 09:54 | #4 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Я в таких случаях сначала добавляю модуль класса примерно такого содержания:
(к примеру, назвал я этот класс NoticeFlat) Код:
(кодом из стандартного модуля) Код:
|
13.04.2011, 09:57 | #5 | |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Цитата:
К тому же, в вашем случае с массивами будет даже проще - либо используйте 4 двумерных массива, либо один 3-мерный. (в массивы можно добавлять элементы пользовательского типа) |
|
13.04.2011, 10:04 | #6 | |
Новичок
Джуниор
Регистрация: 13.04.2011
Сообщений: 6
|
Цитата:
У меня была похожая ситуация год назад, но код дома на компе, а дома буду только в пятницу вечером. Там, насколько я помню, ситуацию разрешил, но вот как я это сделал - уже не помню. |
|
13.04.2011, 10:22 | #7 |
Новичок
Джуниор
Регистрация: 13.04.2011
Сообщений: 6
|
Мне в Вашем коде не понятна строчка
Код:
|
13.04.2011, 10:25 | #8 | ||
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Цитата:
Это диапазон ВЫДЕЛЕННЫХ ПОЛЬЗОВАТЕЛЕМ строк, за исключением строк 1 и 2 (строк заголовка) Цитата:
Код:
|
||
13.04.2011, 10:44 | #9 |
Новичок
Джуниор
Регистрация: 13.04.2011
Сообщений: 6
|
Получился следующий код:
Объявление класса Rec: Код:
Код:
ByRef argument type mismatch |
13.04.2011, 11:24 | #10 |
Программист VBA
СуперМодератор
Регистрация: 13.07.2008
Сообщений: 6,858
|
Перед строкой 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 |