VBA - Редактор исходных данных + использование class_module
Запись от Bati4eli размещена 07.11.2012 в 12:35
Показов 4815
Комментарии 0
|
Во вложении лежит весьма интересный файл! В нем вы найдете модули с кодами для:
Кликните здесь для просмотра всего текста
Файл будет полезным практически всем пользователям сводных таблиц в Excell! Далее подробнее (для тех кто программирует) опишу свойства класса "MYTabl" : Кликните здесь для просмотра всего текста
• AllEditItems - возвращает массив элементов класса MYItems, которые были исправлены пользователем. • Cell - возвращает элемент по заданной строке и колонке класса MYItems. • Changed - возвращает переменную типа Boolean, указывающую был ли исправлен вручную какой-нибудь элемент. • Cancellation - отменяет все сделанные пользователем действия и возвращает в таблицу те данные, которые были программно заполнены. • CountColumns - возвращает кол-во столбцов в таблице типа Long • CountRows - возвращает кол-во строк в таблице типа Long • Field - возвращает элемент заголовка класса MYField. • Get_HELP - выводит данное сообщение. • GetTagOfColumn - получает свойство Tag для заголовка по номеру колонки. • LetTagOfColumn - Задает свойство Tag по номеру колонки. • LetValue - важный модуль для программного заполнения ячеек таблицы. • NameColumn - возвращает название колонки по её номеру • NewColumn - модуль для создания колонки, все колонки должны быть созданы до создания строк! • NewRow - модуль для создания строки • RegForm - САМЫЙ основной модуль! без него таблица не будет создана! • Redo - модуль для отмены последнего возврата действия в таблице • RedoEnabled - возвращает доступность модуля Redo • Set_to_saved - переводит переменную Changed (исправлен) для всех элементов класса MYItems в положение False • TablSize - модуль для регулирования размера таблицы • Undo - модуль для отмены последнего действия в таблице • UndoEnabled - возвращает доступность модуля Undo ======================================== ===================================== Свойства и методы класса MYfield : • column - возвращает номер колонки заголовка • Parent - возвращает родителя (MYtabl) *(используется для внутренних операций классов) • Tag - Тэг заголовка можно использовать для прикрепления любой пользовательской информации • Имя_поля - возвращает имя самого заголовка • ПолеЗаголовок - возвращает объект MSForms.Label *(используется для внутренних операций классов) • Тип_данных - заложенный тип данных для этого заголовка при создании модулем NewColumn ======================================== ===================================== Свойства и методы класса MYitems : • Changed - возвращает значение True или False в зависимости от того был ли этот элемент исправлен непрограммно • column - возвращает номер столбца занимаемый этим элементом • control - возвращает основной control этого поля (ComboBox) • NoChange - модуль устанавливающий Changed в положение False *(используется для внутренних операций классов) • Parent - возвращает родителя (MYtabl) *(используется для внутренних операций классов) • row - возвращает номер строки занимаемый этим элементом • Адрес - источник типа string, заданный с помощью модуля LetValue • Внутр_значение - скрытое значение полученное сначало модулем LetValue, а затем в случае правки пользователя • Имя_поля - возвращает название поля (столбца) • Тип_данных - заложенный тип данных для этого элемента при создании модулем NewColumn Данный макрос не работает с базами данных! Так же из-за недочетов MS Excel, невозможно определить "искусственные поля" (созданные например из поля "Дата" поля "Годы" и "Месяцы" не будут определены в фильтре!), и невозможно определить в фильтре сводной отобрана та или иная дата если она не имеет в источнике международный формат "*ДД.ММ.ГГГГ", а в самой сводной "ДД-ММ-ГГГГ". И пока возникают проблемы с открытием внешних источников содержащих в пути или имени файла следующие знаки : "[]!" -так как они используются в экселевских формулах.. Большая просьба оценить сие творение! 
|
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Всего комментариев 0
Комментарии
