|
DLL предназначенная для выгрузки содержимого TreeView в Excel.
Cвойства:
FirstRow - Integer строка с которой на листе Excel будет расположен заголовок (если есть) или корневые категории (по умолчанию = 1)
Title - String - заголовок для всего дерева, выводится в строке FirstRow
LevelStyleAsInTree - Boolean - устанавливает стиль и размер шрифта как в дереве, если установлено в TRUE, то в этом случае все настройки для уровня заданные методом SetLevelStyle игнорируются
ErrorNumber - Long - номер произошедшей ошибки
ErrorDescription - String - Описание произошедшей ошибки
Методы:
SetLevelStyle - устанавливает параметры шрифта для уровня
.SetLevel (Номер уровня, Размер шрифта, Код цвета для Шрифта,Код цвета Фона,Жирный, Наклонный)
Цвета можно передавать и в RGB в приципе класс должен сам разбираться что и как ...
например так:
pr.SetLevel 5, 15, 8, ,True, True
|
Для пятого уровня выставляем шрифт размером 15, цвет красный, фона нет, Жирный, наклонный.
Можно не использовать по умолчанию шрифт 10, черный, простой, заливки нет.
SetTitleStyle - настроки для заголовка параметры как у SetLevelStyle только без указания номера уровня
PrintTree - собственно вывод в Excel в качестве параметра нужно указать Treeview например
pr.PrintTree Me.TreeVWGroup
|
Пример вызова:
Dim pr As clsPrintTree
Set pr = New clsPrintTree
pr.SetTitleStyle 25, 3, 12, True ' Выставляем стиля для заголовка
pr.SetTitleStyle 1, 12, 3, 8, True ' выставляем шрифт для перовго уровня, остальные по умолчанию
pr.FirstRow = 10 ' в Excel расположить с 10-й строки
pr.PrintTree Me.TreeVWGroup ' собственно печать контрола TreeVWGroup
|
Для новичков:
Естественно DLL предварительно нужно регистрить ( c:\WINDOWS\system32\regsvr32.exe TreeView2Excel.dll) и установить из ACCESS ссылку на 'Export TreeView control to Ms Excel"
Просмотров: 15317
 Ваш коментарий будет первым | |
|
