Всем привет.

Бывает надо как-то отфильтровать по цвету. Такая опция встроена в редакторе таблиц от Microsoft. В OOo же почему-то нет =( Ну да ладно, ждемс =-)

1. OOo Calc > Сервис > Макросы > Управление макросами-Basic (оно же открыть можно по Alt+F11)

2. Мои макросы - Standart - Module1, в правом окошке Main > редактировать.

3. В редакторе макросов переходим в конец (Ctrl+End), вставляем:

Function BackColor(a)

oSheet = ThisComponent.CurrentController.ActiveSheet

oCell = oSheet.getCellRangeByName(a)

BackColor = oCell.CellBackColor

End Function

Сохраняем и закрываем редактор макросов.

4. Вставляем формулу напротив ячейки (в нашем случае B1):

=BACKCOLOR("A" & ROW())

Растягиваем

По получившимся значениям можно фильтровать.

Для шрифта всё то же самое, только вместо CellBackColor нужно использовать CharColor

ps

Решение, описанное выше, любезно предоставлено JohnSUN.