Фильтрация данных в рабочей книге

Копировать пример

Sub UserProc;
Var
    MB: IMetabase;
    CrInfo: IMetabaseObjectCreateInfo;
    MObj: IMetabaseObject;
    Exp: IEaxAnalyzer;
    WB: ILaner;
    Filter: ILanerFilter;
Begin
    MB := MetabaseClass.Active;
    //Открываем рабочую книгу на редактирование
    MObj := MB.ItemById("OBJ123").Edit;
    Exp := MObj As IEaxAnalyzer;
    WB := Exp.Laner;
    Filter := WB.Filter;
    //Устанавливаем фильтр для скрытия пустых значений
    Filter.SuppressEmpty := True;
    //Будут скрываться ячейки как с концов, так и внутри данных ряда
    Filter.SuppressEmptyArea := LnSuppressEmptyArea.FullSerie;
    MObj.Save;
End Sub UserProc;