ITabRange.AppliedFormatConditions

Синтаксис

AppliedFormatConditions([AllCells: Boolean = false]): ITabFormatConditions;

AppliedFormatConditions[System.Boolean]: Prognoz.Platform.Interop.Tab.TabFormatConditions;

Параметры

AllCells. Параметр принимает значения:

Описание

Свойство AppliedFormatConditions возвращает список условий форматирования, которые выполняются для ячейки или диапазона ячеек.

Комментарии

Типы условного форматирования содержатся в перечислении TabConditionType.

Для определения диапазона ячеек, для которых выполняется условное форматирование используйте свойство ITabFormatCondition.AppliedRange.

Пример

Для выполнения примера убедитесь, что в репозитории содержится регламентный отчёт с идентификатором «REGULAR_REPORT». В отчёте добавьте значения и настройте формат ячейки: добавьте несколько условий форматирования для выделенного диапазона ячеек на вкладке «Форматирование по условию». Перед выполнением примера выделите диапазон ячеек со значениями и сохраните отчёт.

Добавьте ссылки на системные сборки: Metabase, Report, Tab.

Sub UserProc;
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Report: IPrxReport;
    Table: ITabSheet;
    Range: ITabRange;
    Conditions: ITabFormatConditions;
    Cond: ITabFormatCondition;
Begin
    MB := MetabaseClass.Active;
    MObj := MB.ItemById("REGULAR_REPORT").Edit;
    Report := MObj As IPrxReport;
    Table := Report.ActiveSheet.Table;
    Range := Table.View.Selection.Range;
    Conditions := Range.AppliedFormatConditions(True);
    For Each Cond In Conditions Do
        Debug.WriteLine("Тип условия: " + Cond.Type.ToString 
        + ", выполняется для всего диапазона ячеек " + Cond.AppliedRange.Address);
    End For;
    Conditions := Range.AppliedFormatConditions(False);
    For Each Cond In Conditions Do
        Debug.WriteLine("Тип условия: " + Cond.Type.ToString
        + ", выполняется для ячеек " + Cond.AppliedRange.Address);
    End For;
End Sub UserProc;

Imports Prognoz.Platform.Interop.Metabase;
Imports Prognoz.Platform.Interop.Report;
Imports Prognoz.Platform.Interop.Tab;
…
Public Shared Sub Main(Params: StartParams);
Var
    MB: IMetabase;
    MObj: IMetabaseObject;
    Report: IPrxReport;
    Table: ITabSheet;
    Range: ITabRange;
    Conditions: ITabFormatConditions;
    Cond: ITabFormatCondition;
Begin
    MB := Params.Metabase;
    MObj := MB.ItemById["REGULAR_REPORT"].Edit();
    Report := MObj As IPrxReport;
    Table := Report.ActiveSheet.Table;
    Range := Table.View.Selection.Range;
    Conditions := Range.AppliedFormatConditions[True];
    For Each Cond In Conditions Do
        System.Diagnostics.Debug.WriteLine("Тип условия: " + Cond.Type.ToString()
        + ", выполняется для всего диапазона ячеек " + Cond.AppliedRange.Address);
    End For;
    Conditions := Range.AppliedFormatConditions[False];
    For Each Cond In Conditions Do
        System.Diagnostics.Debug.WriteLine("Тип условия: " + Cond.Type.ToString()
        + ", выполняется для ячеек " + Cond.AppliedRange.Address);
    End For;
End Sub;

После выполнения примера в консоль будут выведены типы условного форматирования с диапазоном ячеек, для которых они выполняются.

См. также:

ITabRange