Как выделить курсор в excel это

Когда приходится работать с большим объемом данных в Excel, где строки сильно растянуты и не умещаются в один экран, сложно сравнить значения в одной и той же строке. Постоянно приходится передвигать горизонтальную полосу прокрутки. Работа была бы более удобной если бы целая активная строка была бы выделена цветом – как курсор на целую строку. Чтобы выделить активную строку или столбец цветом, создадим свою функцию в Excel с помощью макроса и с комбинируем ее с условным форматированием.

Подсветка строки в Excel цветом

Чтобы создать свой широкий курсов на целую строку в Excel, необходимо создать макрос и использовать его вместе с условным форматированием. Для примера создадим таблицу с широкими строками и большим количеством столбцов. Нам нужно выделить строку цветом по условию Excel. Например, если активная ячейка находится в строке 2, тогда выделить цветом всю строку 2 (в пределах таблицы или на весь лист). Для примера создадим таблицу с широкими строками и большим количеством столбцов:

Исходная таблица.

Подсветка текущей строки в Excel цветом:

  1. Откройте редактор VBA для этого выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Visual Basic». Или нажмите комбинацию горячих клавиш ALT+F11.
  2. В правом окне к активному проекту добавьте новый модуль. Для того в редакторе VBA выберите опцию: «Insert»-«Module»
  3. В окне модуля вставьте этот VBA-код макроса:
  4. VBA-код макроса.

  5. Не закрывая окно VBA-редактора перейдите на рабочий лист с исходной таблицей. Выделите целую вторую строку таблицы A2:H2 и выберите инструмент: «ГЛАВНАЯ»-«Условное форматирование»-«Создать правило»-«Использовать формулу для определения форматированных ячеек:».
  6. Использовать формулу.

  7. В полю ввода введите формулу:
  8. АктивнаяСтрока.

  9. Щелкните по кнопке «Формат» и на вкладке «Заливка» укажите зеленый цвет. На всех окнах жмем ОК.
  10. Формат.

  11. Скопируйте вторую строку таблицы.
  12. Копируем вторую строку.

  13. Выделите остальные строки и выберите инструмент: «ГЛАВНАЯ»-«Вставить»-«Специальная вставка»-«Форматы» (или нажмите комбинацию клавиш CTRL+ALT+V, потом отметить форматы и нажать ОК). Или воспользуйтесь инструментом: «ГЛАВНАЯ»-«Буфер обмена»-«Формат по образцу».
  14. Специальная вставка.

  15. Вернитесь к редактору VBA и в окне «Project» дважды щелкните по «Лист1». В появившемся окне вставьте следующий VBA-код макроса:
  16. Project.

  17. Сохраните и закройте редактор VBA.

Широкий курсор.

В результате происходит выделение строки условным форматированием только там, где находится активная ячейка. Эффект широкого курсора таблицы для комфортного просмотра данных с большим объемом информации. Сделав активной любую ячейку таблицы и сразу же выделяется цветом строка в которой находится данная ячейка.



Полезный вопрос! А как же выделить активный столбец цветом? Аналогичным методом реализовывается с помощью макроса не только подсветка цветом активной строки, но и столбца. Для этого:

  1. В модуль где находится код подсветки строки VBA-макроса, добавим код новой функции АктивныйСтолбец:
  2. Код VBA.

  3. Добавим новое правило в условном форматировании для нашей таблицы в диапазоне A1:A7. Теперь в новом правиле пишем функцию АктивныйСтолбец(), а вместо функции СТРОКА – СТОЛБЕЦ. И указываем синий цвет форматирования заливки ячейки.
  4. АктивныйСтолбец.

  5. Проверим все созданные правила для таблицы. Перейдите в ячейку A2 и ввыберите инструмент: «ГЛАВНАЯ»-«Условное форматирование»-«Управление правилами». Диспетчер правил условного форматирования должен выглядеть так:
  6. Диспетчер правил.

  7. Скопируйте формат столбца A1:A7 в остальные столбцы таблицы диапазона B1:H7. Например, с помощью инструмента: «ГЛАВНАЯ»-«Буфер обмена»-«Формат по образцу».
  8. Формат по образцу.

  9. Результат превышает ожидания. Идеальный курсор для просмотра огромных таблиц с большим количеством данных на множестве строк и столбцов:

Крестообразный курсор.

Принцип действия создания пользовательского курсора для таблицы

Применяемая в условном форматировании созданная нами функция VBA =АктивнаяСтрока() позволяет нам получить номер текущей строки в которой стала активной любая из ее ячеек. Результат вычисления пользовательской функции =АктивнаяСтрока() сравнивается с результатом функции =СТРОКА(), которая также возвращает номер текущей строки в данном моменте вычисления условного форматирования.

Скачать пример выделения активной строки и столбца цветом

Так как обе функции выполняются при активной ячейке в одной и той же строке их значения равны между собой и возвращают общее логическое значение ИСТИНА. В результате чего происходит выделение строки цветом по условию. Если значение ИСТИНА, тогда присваивается формат цвета для целой активной строки таблицы.

Содержание

  • 1 Подсветка строки в Excel цветом
    • 1.1 Принцип действия создания пользовательского курсора для таблицы
      • 1.1.1 Цветовая схема в Excel. Как менять?
      • 1.1.2 Тема документа Excel, PowerPoint или Word
  • 2 Свойство .Interior.Color объекта Range
    • 2.1 Заливка ячейки цветом в VBA Excel
    • 2.2 Вывод сообщений о числовых значениях цветов
    • 2.3 Использование предопределенных констант
    • 2.4 Цветовая модель RGB
  • 3 Свойство .Interior.ColorIndex объекта Range

Когда приходится работать с большим объемом данных в Excel, где строки сильно растянуты и не умещаются в один экран, сложно сравнить значения в одной и той же строке. Постоянно приходится передвигать горизонтальную полосу прокрутки. Работа была бы более удобной если бы целая активная строка была бы выделена цветом – как курсор на целую строку. Чтобы выделить активную строку или столбец цветом, создадим свою функцию в Excel с помощью макроса и с комбинируем ее с условным форматированием.

Чтобы создать свой широкий курсов на целую строку в Excel, необходимо создать макрос и использовать его вместе с условным форматированием. Для примера создадим таблицу с широкими строками и большим количеством столбцов. Нам нужно выделить строку цветом по условию Excel. Например, если активная ячейка находится в строке 2, тогда выделить цветом всю строку 2 (в пределах таблицы или на весь лист). Для примера создадим таблицу с широкими строками и большим количеством столбцов:

Подсветка текущей строки в Excel цветом:

  1. Откройте редактор VBA для этого выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Visual Basic». Или нажмите комбинацию горячих клавиш ALT+F11.
  2. В правом окне к активному проекту добавьте новый модуль. Для того в редакторе VBA выберите опцию: «Insert»-«Module»
  3. В окне модуля вставьте этот VBA-код макроса:
  4. Не закрывая окно VBA-редактора перейдите на рабочий лист с исходной таблицей. Выделите целую вторую строку таблицы A2:H2 и выберите инструмент: «ГЛАВНАЯ»-«Условное форматирование»-«Создать правило»-«Использовать формулу для определения форматированных ячеек:».
  5. В полю ввода введите формулу:
  6. Щелкните по кнопке «Формат» и на вкладке «Заливка» укажите зеленый цвет. На всех окнах жмем ОК.
  7. Скопируйте вторую строку таблицы.
  8. Выделите остальные строки и выберите инструмент: «ГЛАВНАЯ»-«Вставить»-«Специальная вставка»-«Форматы» (или нажмите комбинацию клавиш CTRL+ALT+V, потом отметить форматы и нажать ОК). Или воспользуйтесь инструментом: «ГЛАВНАЯ»-«Буфер обмена»-«Формат по образцу».
  9. Вернитесь к редактору VBA и в окне «Project» дважды щелкните по «Лист1». В появившемся окне вставьте следующий VBA-код макроса:
  10. Сохраните и закройте редактор VBA.

В результате происходит выделение строки условным форматированием только там, где находится активная ячейка. Эффект широкого курсора таблицы для комфортного просмотра данных с большим объемом информации. Сделав активной любую ячейку таблицы и сразу же выделяется цветом строка в которой находится данная ячейка.

Полезный вопрос! А как же выделить активный столбец цветом? Аналогичным методом реализовывается с помощью макроса не только подсветка цветом активной строки, но и столбца. Для этого:

  1. В модуль где находится код подсветки строки VBA-макроса, добавим код новой функции АктивныйСтолбец:
  2. Добавим новое правило в условном форматировании для нашей таблицы в диапазоне A1:A7. Теперь в новом правиле пишем функцию АктивныйСтолбец(), а вместо функции СТРОКА – СТОЛБЕЦ. И указываем синий цвет форматирования заливки ячейки.
  3. Проверим все созданные правила для таблицы. Перейдите в ячейку A2 и ввыберите инструмент: «ГЛАВНАЯ»-«Условное форматирование»-«Управление правилами». Диспетчер правил условного форматирования должен выглядеть так:
  4. Скопируйте формат столбца A1:A7 в остальные столбцы таблицы диапазона B1:H7. Например, с помощью инструмента: «ГЛАВНАЯ»-«Буфер обмена»-«Формат по образцу».
  5. Результат превышает ожидания. Идеальный курсор для просмотра огромных таблиц с большим количеством данных на множестве строк и столбцов:

Принцип действия создания пользовательского курсора для таблицы

Применяемая в условном форматировании созданная нами функция VBA =АктивнаяСтрока() позволяет нам получить номер текущей строки в которой стала активной любая из ее ячеек. Результат вычисления пользовательской функции =АктивнаяСтрока() сравнивается с результатом функции =СТРОКА(), которая также возвращает номер текущей строки в данном моменте вычисления условного форматирования.

Скачать пример выделения активной строки и столбца цветом

Так как обе функции выполняются при активной ячейке в одной и той же строке их значения равны между собой и возвращают общее логическое значение ИСТИНА. В результате чего происходит выделение строки цветом по условию. Если значение ИСТИНА, тогда присваивается формат цвета для целой активной строки таблицы.

Итак, наша цель — построить инструмент, который умеет отслеживать на экране местоположение активной ячейки, выделяя цветом текущую строку и столбец. В результате на листе появится своего рода «координатная линейка», и просматривать таблицу станет намного удобнее. Решить такую задачу можно по-разному. Например, обратиться к языку VBA (Visual Basic for Application) и написать специальную программу. Но я не сторонник этого подхода. И потому предлагаю начать со стандартных возможностей MS Excel.

Способ 1. Используем условный формат
и функцию «ЯЧЕЙКА()»

Для организации координатной подсветки нам нужно решить две проблемы:

1. Как-то определить номер строки и колонки, где находится активная ячейка.

2. Изменить формат этих строк и колонок, чтобы обозначить их на рабочем листе.

Для решения первой задачи мы задействуем функцию «ЯЧЕЙКА()» из стандартной библиотеки MS Excel. После этого, зная номер конкретной строки и колонки, мы применим к ним условное форматирование. Как видите, схема проста. Остается реализовать ее практически. Начнем с функции «ЯЧЕЙКА()». Она позволяет получить массу полезной информации о любой ячейке рабочего листа. Например, узнать ее высоту, ширину, номер строки или колонки, числовой формат и т. п. У функции два аргумента:

—  ключевое слово, это может быть «»строка»» или «»столбец»»;

—  адрес ячейки, для которой нужно выяснить ее параметры.

Хитрость состоит в том, что второй аргумент указывать не обязательно. И тогда функция вернет параметры для текущей ячейки. То есть через функцию «ЯЧЕЙКА()» мы сможем определить номер строки и колонки для активной ячейки рабочего листа — именно то, что нам нужно для решения первой задачи.

Переходим к условному форматированию. Этот полезный инструмент Excel позволит нам изменить формат ячеек, если они удовлетворяют определенному условию. Причем (и это очень важно!) условие в данном случае можно задать при помощи формулы. Итак, все инструменты для решения задачи, похоже, у нас есть. Переходим к деталям. Посмотрим, как все это выглядит в программе Excel 2010. Делаем так:

1. Открываем (или создаем новый) документ Excel. Пусть это будет база данных, как на рис. 1.

2. Щелкаем мышкой на ячейке «A1».

3. Переходим в меню «Главная». В группе «Стили» щелкаем на иконке «Условное форматирование» (рис. 2). Откроется меню, как на рис. 3.

4. Из этого меню выбираем пункт «Создать правило…». Откроется окно «Создание правила форматирования», изображенное на рис. 4.

5. В разделе «Выберите тип правила:» находим вариант «Использовать формулу для определения форматируемых ячеек».

6. В поле «Измените описание правила:» вводим формулу «=ИЛИ(ЯЧЕЙКА(«строка»)=СТРОКА(A1);ЯЧЕЙКА(«столбец»)=СТОЛБЕЦ(A1))».

7. Щелкаем на кнопке «Формат…» (рис. 4). Откроется окно «Формат ячеек», изображенное на рис. 5.

8. В этом окне переходим на закладку «Заливка». В предложенной палитре выбираем цвет фона. Например, светло-серый вариант.

9. В окне «Формат ячеек» нажимаем «ОК».

10. В окне «Создание правила форматирования» нажимаем «ОК». Условный формат для ячейки «A1» готов. Остается скопировать его на весь рабочий лист.

11. Оставаясь на ячейке «A1», щелкаем на кнопке «Формат по образцу» (рис. 6).

12. Обводим при помощи мышки (не клавиатуры!) блок ячеек, где нужно создать координатное выделение.

Совет В Excel 2003 (или более ранних версиях этой программы) вызвать инструмент условного форматирования можно через меню «Формат → Условное форматирование…». После чего в окне настроек установить параметр «Условие 1» в положение «формула».

Пару слов о работе формулы и о том, как она связана с условным форматированием. Напомню, что сейчас мы находимся в ячейке «A1», причем формулу мы записали именно для этой ячейки. Теперь по порядку. Начнем с выражения «ЯЧЕЙКА(«строка»)». Поскольку в функции адрес явно не указан, номер строки она определит для активной ячейки рабочего листа. Это значение мы сравним с номером строки для адреса «A1». Этот номер нам вернет функция «СТРОКА(A1)». И тогда, если указатель активной ячейки находится в первой строке рабочего листа, выражение «ЯЧЕЙКА(«строка»)=СТРОКА(A1)» будет истинным. В противном случае эта формула вернет значение «ЛОЖЬ». Вторая часть формулы, по сути, такая же, только проверяет она номер колонки. То есть выражение «ЯЧЕЙКА(«столбец») =СТОЛБЕЦ(A1))» сравнивает номер колонки для активной ячейки с номером столбца для адреса «A1».

Все, что остается сделать, — это объединить оба выражения через операцию «ИЛИ()». И тогда полученная формула будет означать: «если активная ячейка находится в первой строке или в первой колонке рабочего листа, верни значение «ИСТИНА» и включи инструмент условного форматирования». Для ячейки «A1» все верно. Остается распространить это правило на всю область рабочего листа. Для этого мы воспользовались иконкой копирования формата ячеек. В этом случае адреса в формуле условного форматирования будут преобразованы по обычным правилам Excel. То есть, при копировании по вертикали поменяются номера строк. При копировании в стороны изменятся номера колонок. Например, формула для условного форматирования ячейки «B1» станет такой: «=ИЛИ(ЯЧЕЙКА(«строка»)=СТРОКА(B1);ЯЧЕЙКА(«столбец»)= СТОЛБЕЦ(B1))». А в результате строка и колонка текущей ячейки поменяет свой цвет. Это и есть координатное выделение, которое мы хотели получить.

Но это еще не все. Дело в том, что правило условного форматирования срабатывает только при обновлении рабочего листа. Например, в момент пересчета формул. Просто перемещение активной ячейки Excel таким обновлением не считает. И поэтому координатная подсветка работать не будет. Для решения проблемы нам придется искусственно обновить лист. Проще всего это сделать при помощи небольшого макроса, добавив его в свойства рабочего листа. Для этого делаем так:

1. Щелкаем правой кнопкой мышки на листе с параметрами условного форматирования. Откроется контекстное меню, как на рис. 7.

2. Из этого меню выбираем пункт «Исходный текст». Откроется окно редактора Visual Basic.

3. В этом окне вставляем такой текст:

«Private Sub Worksheet_SelectionChange(ByVal Target As Range)

ActiveCell.Calculate

End Sub».

4. Закрываем окно Visual Basic. На предложение сохранить изменения отвечаем утвердительно.

Важно! Текст модуля на Visual Basic нужно вводить без окаймляющих кавычек.

Теперь при любом перемещении активной ячейки будет активировано условное форматирование, а на листе появится координатное выделение строк и колонок, как показано на рис. 8. Задача решена.

Посмотрим, что мы получили на самом деле, каковы достоинства и недостатки нашего подхода. Вначале о преимуществах, среди которых я бы указал такие:

—  инструмент условного форматирования не нарушает функционал таблицы, работают все приемы копирования, перемещения ячеек;

—  работа с условными форматами не нарушает форматирование таблицы;

—  наш вариант реализации координатной подсветки правильно работает с таблицами, где есть объединенные ячейки, а это для бухгалтера очень важно;

—  макросы на VBA нужны в минимальном объеме, прикрепить их к рабочему листу не составляет труда.

Что касается недостатков, они тоже есть, в частности:

—  формулу для условного форматирования нужно создавать вручную;

—  нет способа быстро включить или отключить координатную подсветку на рабочем листе — для этого нужно удалить правило условного форматирования, а это потребует времени;

—  при копировании ячеек с других рабочих книг или листов для них придется восстанавливать правила условного форматирования.

На мой взгляд, указанные проблемы не относятся к разряду существенных. По личному опыту скажу, что работа с координатным вычислением на базе условного форматирования не вызывает никаких проблем. Тем не менее имеет смысл посмотреть и на другие способы решения задачи. Чем мы сейчас и займемся.

Способ 2. Применяем надстройку «FollowCellPointer»

В результате пятнадцатиминутного общения с Google я обнаружил по меньшей мере десяток вариантов для реализации координатной подсветки с использованием макросов на VBA. Все они отличались в деталях, но принцип был один: для обозначения строки и колонки эти макросы использовали выделение несвязных диапазонов. В ручном режиме это можно сделать, нажав клавишу «Ctrl», а затем щелчком мышки выделить строку и колонку. Такие варианты я отбросил без сожаления — когда на листе выделен несвязный диапазон, не работают операции копирования и перемещения ячеек. А это — огромный недостаток при работе с таблицей. Да и углубляться в тонкости работы с VBA, откровенно говоря, не хотелось бы. Но одна ссылка меня заинтересовала. Речь шла о готовой надстройке «FollowCellPointer», которую раздает на своем сайте Jan Karel Pieterse (Нидерланды). Продукт этот бесплатный, построен он на макросах Excel и позволяет рисовать на листе графические линии для обозначения строки и колонки активной ячейки.

Прежде чем познакомится с этой программой, ее нужно скачать. Для этого делаем так:

1. Заходим на сайт и щелкаем на гиперссылке «free utilities» (рис. 9). Откроется раздел загрузок, который оформлен в виде таблицы.

2. В предложенном перечне находим программу «FollowCellPointer» (рис. 9) и щелкаем на ссылке левой кнопкой мышки. Через некоторое время в папке загрузок вашего браузера появится файл «followcellpointer.zip».

3. Копируем этот файл в любую папку и распаковываем его. Все, надстройка готова для инсталляции.

Важно! Для работы с файлом «followcellpointer.zip» на вашем компьютере должна быть установлена программа-архиватор (WinRar, WinZip или аналогичная).

В подавляющем большинстве случаев такая программа есть. И тогда для распаковки достаточно щелкнуть на имени файла левой кнопкой мышки, затем выбрать из контекстного меню «Извлечь все…» или «Распаковать в текущую папку». В результате в этой папке появится файл «FollowCellPointer.xla». Щелчком мышки загружаем его в MS Excel. Надстройка готова к работе.

Важно! Для работы надстройки в Excel 2010 скопируйте файл «FollowCellPointer.xla» в системную папку дополнений MS Office. По умолчанию путь к этой папке выглядит так: «C:Users…AppDataRoamingMicrosoftAddIns». В этой строке вместо символа «…» нужно поставить имя пользователя для вашей учетной записи Windows.

Дальше делаем так:

1. Открываем или создаем новый документ.

2. Вызываем меню «Файл», затем щелкаем на пункт «Параметры».

3. В окне настроек Excel переходим в раздел «Надстройки» и нажимаем кнопку «Перейти…» (рис. 10). Откроется одноименное окно «Надстройки», как на рис. 10.

4. В этом окне ставим «галочку» возле строки «FollowCellPointer».

5. В окне «Надстройки» нажимаем «ОК».

6. Переходим в меню «Надстройки». Лента этого меню показана на рис. 11. На ней появится дополнительная группа с иконками: «Enable», «Disable», «Anchor», «ClearAnchor», «Format».

7. Щелкаем на иконке «Enable». Возле активной ячейки появятся тонкие линии, как показано на рис. 12. На мой взгляд, весьма изящное решение, вполне заменяет координатную подсветку строк и колонок.

Чтобы отключить этот режим, щелкаем на кнопке «Disable».

Как и большинство программ, «FollowCell- Pointer» содержит ряд полезных режимов и настроек. Вот основные из них.

Инструмент «Anchor» (рис. 11) позволяет зафиксировать обозначение текущей ячейки, после чего продолжить работу в обычном режиме. Такая возможность полезна, например, при анализе связей между ячейками таблицы. Пример использования режима «Anchor» показан на рис. 13.

Кнопка «ClearAnchor» стирает отметку, сделанную в режиме «Anchor».

Последней иконкой, относящейся к «FollowCellPointer», является кнопка «Format». Щелчок на этой кнопке открывает окно «Format Arrows», изображенное на рис. 14. Несмотря на английский интерфейс, здесь все просто. Большинство параметров в этом окне позволяют изменить форму стрелок и линий для отметки текущей ячейки. Приведу вкратце основные настройки, представленные в окне «Format Arrows»:

— «Arrow head style» изменяет форму указателей на линиях, которые ведут к активной ячейке. Возможные варианты: «Diamond» — указатели выглядят как ромбики, «Open» — тонкие стрелки, «Oval» — круглые указатели, «None» — линии будут показаны без указателей, «Triangle» — указатели выглядят как заполненные стрелки (в виде треугольников);

— «Arrow head length» позволяет отрегулировать длину указателей на конце линий. Предусмотрены два варианта: «Short» — короткий, и «Long» — продолговатый;

— «Arrow head width» — здесь можно задать ширину указателя: «Narrow» — тонкий, и «Wide» — широкий;

— «Arrow line width» — этот параметр влияет на толщину линий: «1» — тонкая линия, «2» — линия с полужирным начертанием;

— «Transparency» изменяет способ рисования линий. Параметр может принимать два значения: «Opaque» — рисовать обычные линии, «Transparent» — рисовать полупрозрачные линии.

Кнопка «Line Color» (рис. 14) позволяет выбрать цвет линии из стандартной палитры MS Excel.

Разумеется, настройка параметров — дело сугубо индивидуальное. Мне понравился вариант с полупрозрачными линиями и округлыми окончаниями. А подробный состав моих настроек выглядит так: «Arrow head length» = «Short», «Arrow head width» = «Narrow», «Arrow line width» = «1», «Transparency» = «Transparent».

На сегодня все. Надеюсь, что материал этой статьи сделает вашу работу с большими таблицами проще и удобнее. До новых встреч!

Жду ваших вопросов, замечаний и предложений на bk@id.factor.ua, nictomkar@rambler.ru или на форуме редакции www.bk.factor.ua/forum.

Сегодня мы отвлечемся от формул и макросов, а уделим немного внимания оформлению панели задач. Знали ли вы что можно изменить привычный цвет ленты команд для Excel 2007 и выше? Вот и я узнал об этом только сегодня, как говорится, век живи — век учись. Я сразу же поменял цвет панели на темно-серую схему, т.к. стандартная голубая, порядком поднадоела. Цветовая схема в Excel, как изменить?

Начиная с Excel 2007  разработчики начали задумываться и над дизайном редактора. Теперь вы можете не только скрывать панель инструментов, но и менять ее цвет. Хотя выбор оформления пока небольшой, это все-таки лучше чем ничего.

Цветовая схема в Excel. Как менять?

Изменить вы сможете зайдя в меню Файл, Параметры — раздел Основные в опции «Цветовая схема» указать желаемую цветовую схему из выпадающего списка, как показано на рисунке ниже.

В 2007 и 2010 версиях программы вы можете выбрать из трех вариантов: синяя, серебристая или черная.

Для Excel 2013 цвета/оттенки уже более современные и стильные — белая, светло-серая или темно-серая.

На моем Excel 2016 я уже изменил оформление ленты на темно-серое, при прочих данных: зеленой и белой. Правда в этой версии редактора, такая возможность называется «Тема Office», интересно, чем не устраивало название «Цветовая схема».

Честно говоря, меня очень удивило, что я не знал или забыл о этой возможности (сами знаете плохо, когда не знаешь, да еще и забудешь), что я решил сделать отдельную запись об этом — вдруг кому-то это тоже покажется любопытным. После чего немного полазил в интернете и не нашел, как увеличить количество данных цветов, если кто знает, интересно, напишите в комментариях.

Тема документа Excel, PowerPoint или Word

Изменение цвета панели инструментов (Цветовой схемы) нельзя путать с изменением цветовой темы документа. Пройдите на вкладку Разметка страницы и в разделе Темы можно выбрать тему с определенным стилем цветов, таблиц и диаграмм или же выбрать отдельные цвета оформления документа — файл будет выглядеть в едином стиле.

Очень часто я использую эту возможность MS Office в PowerPoint при создании моих презентаций — т.к. это делает ее более стильной или в Word для единообразного описания сделанной работы в Excel.

Поделитесь нашей статьей в ваших соцсетях:

(Visited 3 177 times, 1 visits today)

В сегодняшней статье мы рассмотрим, как с помощью небольшого макроса и условного форматирования создать ролловер эффект в Excel. Данный эффект используется для подсвечивания элемента при наведении мышки на кнопку или ссылку. В нашем случае мы реализуем работу Excel таким образом, чтобы при наведении курсора на ячейку, цвет фона менялся.

Данная технология описана на сайте Джордана Голдмайера optionexplicitvba

Зачем вообще использовать ролловер эффект? Основная идея в том, чтобы отобразить какую-нибудь информацию или выделить элемент интерфейса во время наведения на него мышкой. В первом случае данный функционал уже реализован с помощью комментариев. Но в поддержку данной методики скажу, что комментирование ограничено теми инструментами, которые предоставляет нам Excel, в то время как написание макросов ограничено лишь нашей фантазией. Плюс ко всему, данную технику можно использовать для реализации интересных дизайнерских решений.

Итак, преступим. Нам понадобится функция ГИПЕРССЫЛКА, которая создает ссылку и позволяет перейти на документ или страницу, находящуюся на сетевом диске или интернет. Данная функция имеет следующий синтаксис:

ГИПЕРССЫЛКА(адрес, )

где,

Адрес – путь или имя открываемого документа. Может быть как адресом на жестком диске, так и URL сайта.

Имя – необязательный аргумент, текст ссылки, под которым мы можем скрыть адрес.

В ячейке B3, к которой мы хотим применить ролловер эффект, вводим следующую формулу:

=ГИПЕРССЫЛКА(RollOverEffect(); «Наведи курсор»)

Excel выдаст нам ошибку, не обращайте пока на нее внимание.

Далее создаем пользовательскую функцию. Для этого переходим в редактор VBA. (О редакторе VBA, вы можете прочитать в статье про создание макросов в Excel.)  И вставляем следующий код:

1
2
3

Public Function RollOverEffect()
Range(«A1»).Value = «Курсор наведен!»
End Function

Данный код будет вызываться функцией ГИПЕРССЫЛКА, каждый раз, как на ячейку будет наведен курсор. Теперь вернитесь в книгу и поместите мышь на ячейку B3. Наша пользовательская функция отработает свой код, и в ячейке A1 вы увидите надпись Курсор наведен!

Чтобы избежать выдачи ошибки #ЗНАЧ!, немного модернизируем нашу формулу и воспользуемся функцией ЕСЛИОШИБКА. Формула примет следующий вид:

=ЕСЛИОШИБКА(ГИПЕРССЫЛКА(RollOverEffect(); «Наведи курсор»); «Наведи курсор»)

Вот и все, если вы найдете интересное применение данной технике, не стесняйтесь, опишите его в комментариях, мы обязательно обсудим.

Напоследок, пример того как я использовал данную технику для подсвечивания ячейки, над которой находится курсор:

Скачать файл с примером применения ролловер эффекта в excel

Заливка ячейки цветом в VBA Excel. Фон ячейки. Свойства .Interior.Color и .Interior.ColorIndex. Цветовая модель RGB. Стандартная палитра из 56 цветов. Предопределенные константы.

  1. Свойство .Interior.Color объекта Range
    • Заливка ячейки цветом в VBA Excel
    • Вывод сообщений о числовых значениях цветов
    • Использование предопределенных констант
    • Цветовая модель RGB
  2. Свойство .Interior.ColorIndex объекта Range

Свойство .Interior.Color объекта Range

Начиная с Excel 2007 основным способом заливки диапазона или отдельной ячейки цветом (зарисовки, добавления, изменения фона) является использование свойства .Interior.Color объекта Range путем присваивания ему значения цвета в виде десятичного числа от 0 до 16777215 (всего 16777216 цветов).

Заливка ячейки цветом в VBA Excel

Пример кода 1:

  Sub ColorTest1()  Range("A1").Interior.Color = 31569  Range("A4:D8").Interior.Color = 4569325  Range("C12:D17").Cells(4).Interior.Color = 568569  Cells(3, 6).Interior.Color = 12659  End Sub  

Поместите пример кода в свой программный модуль и нажмите кнопку на панели инструментов «Run Sub» или на клавиатуре «F5», курсор должен быть внутри выполняемой программы. На активном листе Excel ячейки и диапазон, выбранные в коде, окрасятся в соответствующие цвета.

Есть один интересный нюанс: если присвоить свойству .Interior.Color отрицательное значение от -16777215 до -1, то цвет будет соответствовать значению, равному сумме максимального значения палитры (16777215) и присвоенного отрицательного значения. Например, заливка всех трех ячеек после выполнения следующего кода будет одинакова:

  Sub ColorTest11()  Cells(1, 1).Interior.Color = -12207890  Cells(2, 1).Interior.Color = 16777215 + (-12207890)  Cells(3, 1).Interior.Color = 4569325  End Sub  

Проверено в Excel 2016.

Вывод сообщений о числовых значениях цветов

Числовые значения цветов запомнить невозможно, поэтому часто возникает вопрос о том, как узнать числовое значение фона ячейки. Следующий код VBA Excel выводит сообщения о числовых значениях присвоенных ранее цветов.

Пример кода 2:

  Sub ColorTest2()  MsgBox Range("A1").Interior.Color  MsgBox Range("A4:D8").Interior.Color  MsgBox Range("C12:D17").Cells(4).Interior.Color  MsgBox Cells(3, 6).Interior.Color  End Sub  

Вместо вывода сообщений можно присвоить числовые значения цветов переменным, объявив их как Long.

Использование предопределенных констант

В VBA Excel есть предопределенные константы часто используемых цветов для заливки ячеек:

Предопределенная константа Наименование цвета
vbBlack Черный
vbBlue Голубой
vbCyan Бирюзовый
vbGreen Зеленый
vbMagenta Пурпурный
vbRed Красный
vbWhite Белый
vbYellow Желтый

Присваивается цвет ячейке предопределенной константой в VBA Excel точно так же, как и числовым значением:

Пример кода 3:

  Range("A1").Interior.Color = vbGreen  

Цветовая модель RGB

Цветовая система RGB представляет собой комбинацию различных по интенсивности основных трех цветов: красного, зеленого и синего. Они могут принимать значения от 0 до 255. Если все значения равны 0 — это черный цвет, если все значения равны 255 — это белый цвет.

Выбрать цвет и узнать его значения RGB можно с помощью палитры Excel:

как сделать цветной курсор в excelПалитра Excel

Чтобы можно было присвоить ячейке или диапазону цвет с помощью значений RGB, их необходимо перевести в десятичное число, обозначающее цвет. Для этого существует функция VBA Excel, которая так и называется — RGB.

Пример кода 4:

  Range("A1").Interior.Color = RGB(100, 150, 200)  

Свойство .Interior.ColorIndex объекта Range

До появления Excel 2007 существовала только ограниченная палитра для заливки ячеек фоном, состоявшая из 56 цветов, которая сохранилась и в настоящее время. Каждому цвету в этой палитре присвоен индекс от 1 до 56. Присвоить цвет ячейке по индексу или вывести сообщение о нем можно с помощью свойства .Interior.ColorIndex:

Пример кода 5:

  Range("A1").Interior.ColorIndex = 8  MsgBox Range("A1").Interior.ColorIndex  

Просмотреть ограниченную палитру для заливки ячеек фоном можно, запустив в VBA Excel простейший макрос:

Пример кода 6:

  Sub ColorIndex()  Dim i As Byte  For i = 1 To 56  Cells(i, 1).Interior.ColorIndex = i  Next  End Sub  

Номера строк активного листа от 1 до 56 будут соответствовать индексу цвета, а ячейка в первом столбце будет залита соответствующим индексу фоном.

Готовую стандартную палитру из 56 цветов можете посмотреть здесь.


Автор:

Peter Berry


Дата создания:

18 Август 2021


Дата обновления:

7 Апрель 2023


Как заменить курсор мыши, поменять цвет и размер

Видео: Как заменить курсор мыши, поменять цвет и размер

Содержание

  • направления
  • Что вам нужно

При использовании Microsoft Excel вы можете настроить внешний вид курсора. Однако вы не можете вносить эти изменения непосредственно в Excel. Вместо этого внесите изменения в панель управления Windows. Windows позволяет упростить использование мыши, изменив цвет и размер курсора. Вы можете настроить курсор, сохранить настройки и открыть Excel, чтобы начать использовать новый цветной курсор.Если вам нужно вернуть курсор к цвету по умолчанию, вернитесь на панель управления и сбросьте настройки.

направления

Изменить цвет курсора мыши в Windows (изображение мыши от Эдвина Селимовича от Fotolia.com)

  1. Нажмите кнопку «Пуск» в Microsoft Windows.

  2. Нажмите «Панель управления».

  3. Нажмите кнопку «Удобство доступа».

  4. Нажмите «Центр легкого доступа».

  5. Нажмите кнопку «Сделать мышь проще в использовании» и ссылку ниже: «Изучите все настройки».

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

  7. Нажмите «Применить». Нажмите «ОК».

  8. Откройте Microsoft Excel.

Что вам нужно

  • Microsoft Windows

По окончании урока вы сможете:

  1. Определить
    виды курсоров при работе с таблицей
  2. Ввести
    список перетаскиванием курсора
  3. Ввести
    список прогрессией
  4. Ввести
    список формулой
  5. Сравнить
    три способа нумерации ячеек

Вы знаете, что строчки в Excel’е нумеруются. И вы можете сказать: этого хватить. Да, но
номера строчек не выводятся на печать, а в таблицах, выводимых на печать,
номера бывают нужны. Откройте Excel
– начинаем!

Для начала маленький ликбез, договариваемся на берегу, как и
что мы будем называть:

  1. Моя любимая панель быстрого доступа (настраивается, импортируется и экспортируется аналогично уроку 18 , уроку 19 и секрету 5)
  2. Поле «Имя ячейки»
  3. Никогда не пользуюсь этим полем (а вообще это команды «Отмена», «Ввод» и «Вставить функцию»)
  4. Поле «Строка формул» (где прекрасно работается с клавиатуры, поэтому нет нужды в пункте 3
  5. Имя столбца (буквенное, но можно сделать и численное)
  6. Выделенная ячейка. Обратите внимание, что при выделении ячейки в правом нижнем углу зелёного прямоугольника отчётливо виден зелёный квадратик.

  1. Имя строки (только численное). Смотрим на поле «Имя ячейки» ‒ имя А1 на пересечении соответствующих строки и столбца
  2. Имя листа (можно переименовать, покрасить, переместить, удалить и т.д.)
  3. Кнопка создания ещё одно листа. Сколько раз щёлкните по плюсику, столько листов добавиться

При работе с Excel’ем
важно замечать изменения курсора – это сигнал о смене режима работы.

  1. Знакомый курсор ‒ стрелка. Активна только с командами на лентах
  2. Курсор изменения размера ячейки. На границе имени столбца или строчки позволяет увеличить или уменьшить размер ячейки (нажали ЛМ ‒ потянули)
  3. Курсор выбора ячейки или диапазона ячеек (нажали ЛМ ‒ потянули)
  4. Курсор заполнения ячеек (нажали ЛМ на зелёный квадратик ‒ потянули, а в некоторых случаях – 2 раза щёлкнули ЛМ по зелёному квадратику)
  5. Курсор перемещения ячейки или диапазона ячеек (нажали ЛМ ‒ переместили)

А теперь подготовительные работы.

Шаг 1. Открываем таблицу

Шаг 2. В ячейке А1 набираем слово
«Перетаскивание». Вот неожиданность ‒ слово вышло за пределы ячейки.

  1. Подводим курсор на строку имён столбцов между «А» и «В» — курсор превращается в двойную стрелку
  2. Нажимаем ЛМ претаскиваем курсор на нужное нам расстояние

Шаг 3. Набираем в ячейку B1 – слово «Прогрессия», в ячейке С1 – слово
«Формула». При необходимости изменяем ширину ячеек. Можно и не вручную изменять
размер ячеек, но об этом как-нибудь потом. (Вы обратили внимание, что в Excel’е первые буквы
предложения не становятся автоматически прописными, как в Word’е?)

Получили такую
картину:

2. Нумерация ячеек перетаскиванием
курсора. Самой простой способ введения списка

Шаг 1. Щёлкаем ячейку А1 и вводим с
клавиатуры «1» и Enter.
Зелёный прямоугольник перескочил на ячейку вниз. Что поделаешь – так устроен Excel. Поэтому ещё раз
щёлкаем по ячейке А2.

Шаг 2. Подводим курсор к маленькому
зелёному квадратику – курсор превращается в маленький чёрный крест

Шаг 3. Нажимаем одновременно ЛМ+Ctrl (клавиша
такая на клавиатуре)

Как только мы это
сделали, так сразу вверху справа от маленького чёрного крестика появился
плюсик:

Шаг 4. Не отпуская ЛМ+Ctrl, тянем мышь до 21 строчки:

Я не удержалась и
обратила ваше внимание на бледный значок, который появился внизу колонки чисел.
Значок называется «Параметры автозамены». Если вы нажмёте на этот значок ЛМ (кстати, курсор превратился в
знакомую белую стрелку), то вы увидите выпадающее меню:

Сделайте отметочку в
памяти: всё это может понадобится когда-нибудь.

А теперь посмотрим на
результат – мы получили пронумерованные ячейки.

3. Нумерация ячеек прогрессией

Шаг 1. Щёлкаем ячейку В2 и вводим с
клавиатуры «1» и Enter.
Зелёный прямоугольник перескочил на ячейку вниз. Что поделаешь – так устроен Excel. Поэтому ещё раз
щёлкаем по ячейке В2.

Шаг 2. Открываем диалоговое окно
«Прогрессия» (лента Главная → группа команд Редактирование →
выпадающее меню → команда Прогрессия → диалоговое окно
Прогрессия):

Шаг 3. Вводим свои «хотелки» в диалоговое
окно:

  1. Расположение по столбцам ‒ мы хотим получить колонку чисел
  2. Тип прогрессии – арифметический. (Арифмети́ческая прогре́ссия ‒ последовательность чисел (членов прогрессии), в которой каждое число, начиная со второго, получается из предыдущего добавлением к нему постоянного числа (шага, или разности прогрессии)
  3. Шаг равен 1 (1, 1+1=2, 2+1=3 и так далее)
  4. Предельное значение равно 20. Если вы не поставите предельное значение, то прогрессия заполнит весь столбик до конца, а где этот конец – не знает никто
  5. Нажимаем ОК

Получаем такую
картину:

4. Нумерация ячеек формулой

Шаг 1. Выделили ячейку С2. А теперь
внимательно – учимся вводить формулы для этого существуют несколько способов. У
каждого из способов есть достоинства и недостатки. По мере дальнейшего
знакомства с Excel
будем учитывать особенности введения формул.

Шаг 2. Набираем в ячейке с клавиатуры знак
«=»:

Видите – появился
текстовый курсор.

Шаг 3. Набираем с клавиатуры поочерёдно
буквы «стр»:

Проявляется немного непривычное меню. И потрясающая фраза: «Возвращает номер строки, определяемой ссылкой». Перевожу на русский язык: в ячейке появится номер соответствующей строки, в нашем случае «2», строка-то вторая.

Шаг 4. Двойной щелчок ЛМ по слову «СТРОКА», а потом нажимаем Enter и любуемся результатом:

Какую формулу задали,
то и получили. Но нам нужна нумерация ячеек, которая начинается с единицы.
Значит в формулу надо внести изменения: «=СТРОКА()-1»:

Шаг 5. Выделяем ячейку С2 (просто щёлкаем по ней ЛМ). Обращаем внимание на строку формул:

Понять и запомнить! В строке формул расписана полностью формула (хорошо, что пока маленькая), а в ячейке результат формулы.

Шаг 6. Щёлкаем ЛМ в строке формул и
добавляем «-1» и нажимаем Enter:

Шаг 7. Теперь подводим курсор к зелёному
маленькому квадратику в правом нижнем углу выделенной ячейки (курсор
превращается в маленький чёрный крестик) делаем двойной щелчок ЛМ:

Можно было просто протащить курсор заполнения ячеек вниз на нужную вам строчку.

Я очень подробно
расписала, как вводится и изменяется формула. На самом деле последовательность
действий такова:

  1. Выделяю ячейку
  2. Набираю знак «=» с клавиатуры и начало формулы – мне тут же услужливо предлагается набор формул
  3. Выбираю нужную мне формулу
  4. Тут же в ячейке добавляю «-1»
  5. Нажимаю Enter
Понять и запомнить! Excel очень требователен к синтаксису формул, поэтому важно с самого начала научится «разговаривать с Excel’ем на одном языке.

5. Нумерация ячеек. Сравнение
трёх способов

Шаг 1. Выделим несколько строк:

  1. подводим курсор к столбцу названия строк, пока курсор не превратиться в горизонтально лежащую толстую стрелку
  2. нажимаем ЛМ  и, не отпуская, тащим вниз (я выделила три строки)

Шаг 2. Нажимаем ПМ и из контекстного
меню выбираем команду «Удалить»

Понять и запомнить! Если мы нажмём клавишу Delete (удалить) на клавиатуре, то мы удалим содержимое ячеек, а не сами строки!:

Получаем такой результат:

Я обращаю ваше внимание, что в столбце с формулами значения пересчитались, и нумерация ячеек не нарушилась. А вот в двух первых столбцах нумерация ячеек нарушилась. Так что выбирайте сами, какой из способов для вас выгоднее в настоящий момент. Для отчётных документов я выбираю третий способ нумерации ячеек.

Если вам нужно добавить строчки, то добавляйте.

Сначала шаг 1 и шаг 2
из раздела 5
(только выбираем команду «Вставить»):

Я выделила три строчки, потому что хочу вставить три строчки, а вы выбирайте сами.

Потом шаг 7 раздела 4
«Нумерация ячеек формулой»

Как видите, нумерация ячеек в третьем столбце сохранилась.

6. Особенности сложной
нумерации ячеек

Шаг 1. Подготовьте ячейки на листе
следующим образом:

Шаг 2. Первые две ячейки протянем с нажатой
клавишей Ctrl, а
две последний ячейки ‒ без этой клавиши:

В данном случае нумерация
ячеек при нажатой клавиши Ctrl не
приводит изменениям. Где нам поможет это свойство Excel’я?

Понять и запомнить! Если в документе у вас есть таблица с перечислением
месяцев, то создайте это перечисление в Excel’е, а затем через буфер обмена перебросьте в документ Word.

Теперь вы сможете:

  1. Определить
    виды курсоров при работе с таблицей
  2. Ввести
    список перетаскиванием курсора
  3. Ввести
    список прогрессией
  4. Ввести
    список формулой
  5. Сравнить
    три способа нумерации ячеек

Оглавление:

  • 1 Как сделать цветной курсор в excel? — Разбираем подробно
  • 2 Подсветка строки в Excel цветом
    • 2.1 Принцип действия создания пользовательского курсора для таблицы
      • 2.1.1 Цветовая схема в Excel. Как менять?
      • 2.1.2 Тема документа Excel, PowerPoint или Word
  • 3 Свойство .Interior.Color объекта Range
    • 3.1 Заливка ячейки цветом в VBA Excel
    • 3.2 Вывод сообщений о числовых значениях цветов
    • 3.3 Использование предопределенных констант
    • 3.4 Цветовая модель RGB
  • 4 Свойство .Interior.ColorIndex объекта Range

Когда приходится работать с большим объемом данных в Excel, где строки сильно растянуты и не умещаются в один экран, сложно сравнить значения в одной и той же строке. Постоянно приходится передвигать горизонтальную полосу прокрутки. Работа была бы более удобной если бы целая активная строка была бы выделена цветом – как курсор на целую строку. Чтобы выделить активную строку или столбец цветом, создадим свою функцию в Excel с помощью макроса и с комбинируем ее с условным форматированием.

Подсветка строки в Excel цветом

Чтобы создать свой широкий курсов на целую строку в Excel, необходимо создать макрос и использовать его вместе с условным форматированием. Для примера создадим таблицу с широкими строками и большим количеством столбцов. Нам нужно выделить строку цветом по условию Excel. Например, если активная ячейка находится в строке 2, тогда выделить цветом всю строку 2 (в пределах таблицы или на весь лист). Для примера создадим таблицу с широкими строками и большим количеством столбцов:

Подсветка текущей строки в Excel цветом:

  1. Откройте редактор VBA для этого выберите инструмент: «РАЗРАБОТЧИК»-«Код»-«Visual Basic». Или нажмите комбинацию горячих клавиш ALT+F11.
  2. В правом окне к активному проекту добавьте новый модуль. Для того в редакторе VBA выберите опцию: «Insert»-«Module»
  3. В окне модуля вставьте этот VBA-код макроса:
  4. Не закрывая окно VBA-редактора перейдите на рабочий лист с исходной таблицей. Выделите целую вторую строку таблицы A2:H2 и выберите инструмент: «ГЛАВНАЯ»-«Условное форматирование»-«Создать правило»-«Использовать формулу для определения форматированных ячеек:».
  5. В полю ввода введите формулу:
  6. Щелкните по кнопке «Формат» и на вкладке «Заливка» укажите зеленый цвет. На всех окнах жмем ОК.
  7. Скопируйте вторую строку таблицы.
  8. Выделите остальные строки и выберите инструмент: «ГЛАВНАЯ»-«Вставить»-«Специальная вставка»-«Форматы» (или нажмите комбинацию клавиш CTRL+ALT+V, потом отметить форматы и нажать ОК). Или воспользуйтесь инструментом: «ГЛАВНАЯ»-«Буфер обмена»-«Формат по образцу».
  9. Вернитесь к редактору VBA и в окне «Project» дважды щелкните по «Лист1». В появившемся окне вставьте следующий VBA-код макроса:
  10. Сохраните и закройте редактор VBA.

В результате происходит выделение строки условным форматированием только там, где находится активная ячейка. Эффект широкого курсора таблицы для комфортного просмотра данных с большим объемом информации. Сделав активной любую ячейку таблицы и сразу же выделяется цветом строка в которой находится данная ячейка.

Полезный вопрос! А как же выделить активный столбец цветом? Аналогичным методом реализовывается с помощью макроса не только подсветка цветом активной строки, но и столбца. Для этого:

  1. В модуль где находится код подсветки строки VBA-макроса, добавим код новой функции АктивныйСтолбец:
  2. Добавим новое правило в условном форматировании для нашей таблицы в диапазоне A1:A7. Теперь в новом правиле пишем функцию АктивныйСтолбец(), а вместо функции СТРОКА – СТОЛБЕЦ. И указываем синий цвет форматирования заливки ячейки.
  3. Проверим все созданные правила для таблицы. Перейдите в ячейку A2 и ввыберите инструмент: «ГЛАВНАЯ»-«Условное форматирование»-«Управление правилами». Диспетчер правил условного форматирования должен выглядеть так:
  4. Скопируйте формат столбца A1:A7 в остальные столбцы таблицы диапазона B1:H7. Например, с помощью инструмента: «ГЛАВНАЯ»-«Буфер обмена»-«Формат по образцу».
  5. Результат превышает ожидания. Идеальный курсор для просмотра огромных таблиц с большим количеством данных на множестве строк и столбцов:

Принцип действия создания пользовательского курсора для таблицы

Применяемая в условном форматировании созданная нами функция VBA =АктивнаяСтрока() позволяет нам получить номер текущей строки в которой стала активной любая из ее ячеек. Результат вычисления пользовательской функции =АктивнаяСтрока() сравнивается с результатом функции =СТРОКА(), которая также возвращает номер текущей строки в данном моменте вычисления условного форматирования.

Скачать пример выделения активной строки и столбца цветом

Так как обе функции выполняются при активной ячейке в одной и той же строке их значения равны между собой и возвращают общее логическое значение ИСТИНА. В результате чего происходит выделение строки цветом по условию. Если значение ИСТИНА, тогда присваивается формат цвета для целой активной строки таблицы.

Итак, наша цель — построить инструмент, который умеет отслеживать на экране местоположение активной ячейки, выделяя цветом текущую строку и столбец. В результате на листе появится своего рода «координатная линейка», и просматривать таблицу станет намного удобнее. Решить такую задачу можно по-разному. Например, обратиться к языку VBA (Visual Basic for Application) и написать специальную программу. Но я не сторонник этого подхода. И потому предлагаю начать со стандартных возможностей MS Excel.

Способ 1. Используем условный формат
и функцию «ЯЧЕЙКА()»

Для организации координатной подсветки нам нужно решить две проблемы:

1. Как-то определить номер строки и колонки, где находится активная ячейка.

2. Изменить формат этих строк и колонок, чтобы обозначить их на рабочем листе.

Для решения первой задачи мы задействуем функцию «ЯЧЕЙКА()» из стандартной библиотеки MS Excel. После этого, зная номер конкретной строки и колонки, мы применим к ним условное форматирование. Как видите, схема проста. Остается реализовать ее практически. Начнем с функции «ЯЧЕЙКА()». Она позволяет получить массу полезной информации о любой ячейке рабочего листа. Например, узнать ее высоту, ширину, номер строки или колонки, числовой формат и т. п. У функции два аргумента:

—  ключевое слово, это может быть «»строка»» или «»столбец»»;

—  адрес ячейки, для которой нужно выяснить ее параметры.

Хитрость состоит в том, что второй аргумент указывать не обязательно. И тогда функция вернет параметры для текущей ячейки. То есть через функцию «ЯЧЕЙКА()» мы сможем определить номер строки и колонки для активной ячейки рабочего листа — именно то, что нам нужно для решения первой задачи.

Переходим к условному форматированию. Этот полезный инструмент Excel позволит нам изменить формат ячеек, если они удовлетворяют определенному условию. Причем (и это очень важно!) условие в данном случае можно задать при помощи формулы. Итак, все инструменты для решения задачи, похоже, у нас есть. Переходим к деталям. Посмотрим, как все это выглядит в программе Excel 2010. Делаем так:

1. Открываем (или создаем новый) документ Excel. Пусть это будет база данных, как на рис. 1.

2. Щелкаем мышкой на ячейке «A1».

3. Переходим в меню «Главная». В группе «Стили» щелкаем на иконке «Условное форматирование» (рис. 2). Откроется меню, как на рис. 3.

4. Из этого меню выбираем пункт «Создать правило…». Откроется окно «Создание правила форматирования», изображенное на рис. 4.

5. В разделе «Выберите тип правила:» находим вариант «Использовать формулу для определения форматируемых ячеек».

6. В поле «Измените описание правила:» вводим формулу «=ИЛИ(ЯЧЕЙКА(«строка»)=СТРОКА(A1);ЯЧЕЙКА(«столбец»)=СТОЛБЕЦ(A1))».

7. Щелкаем на кнопке «Формат…» (рис. 4). Откроется окно «Формат ячеек», изображенное на рис. 5.

8. В этом окне переходим на закладку «Заливка». В предложенной палитре выбираем цвет фона. Например, светло-серый вариант.

9. В окне «Формат ячеек» нажимаем «ОК».

10. В окне «Создание правила форматирования» нажимаем «ОК». Условный формат для ячейки «A1» готов. Остается скопировать его на весь рабочий лист.

11. Оставаясь на ячейке «A1», щелкаем на кнопке «Формат по образцу» (рис. 6).

12. Обводим при помощи мышки (не клавиатуры!) блок ячеек, где нужно создать координатное выделение.

Совет В Excel 2003 (или более ранних версиях этой программы) вызвать инструмент условного форматирования можно через меню «Формат → Условное форматирование…». После чего в окне настроек установить параметр «Условие 1» в положение «формула».

Пару слов о работе формулы и о том, как она связана с условным форматированием. Напомню, что сейчас мы находимся в ячейке «A1», причем формулу мы записали именно для этой ячейки. Теперь по порядку. Начнем с выражения «ЯЧЕЙКА(«строка»)». Поскольку в функции адрес явно не указан, номер строки она определит для активной ячейки рабочего листа. Это значение мы сравним с номером строки для адреса «A1». Этот номер нам вернет функция «СТРОКА(A1)». И тогда, если указатель активной ячейки находится в первой строке рабочего листа, выражение «ЯЧЕЙКА(«строка»)=СТРОКА(A1)» будет истинным. В противном случае эта формула вернет значение «ЛОЖЬ». Вторая часть формулы, по сути, такая же, только проверяет она номер колонки. То есть выражение «ЯЧЕЙКА(«столбец») =СТОЛБЕЦ(A1))» сравнивает номер колонки для активной ячейки с номером столбца для адреса «A1».

Все, что остается сделать, — это объединить оба выражения через операцию «ИЛИ()». И тогда полученная формула будет означать: «если активная ячейка находится в первой строке или в первой колонке рабочего листа, верни значение «ИСТИНА» и включи инструмент условного форматирования». Для ячейки «A1» все верно. Остается распространить это правило на всю область рабочего листа. Для этого мы воспользовались иконкой копирования формата ячеек. В этом случае адреса в формуле условного форматирования будут преобразованы по обычным правилам Excel. То есть, при копировании по вертикали поменяются номера строк. При копировании в стороны изменятся номера колонок. Например, формула для условного форматирования ячейки «B1» станет такой: «=ИЛИ(ЯЧЕЙКА(«строка»)=СТРОКА(B1);ЯЧЕЙКА(«столбец»)= СТОЛБЕЦ(B1))». А в результате строка и колонка текущей ячейки поменяет свой цвет. Это и есть координатное выделение, которое мы хотели получить.

Но это еще не все. Дело в том, что правило условного форматирования срабатывает только при обновлении рабочего листа. Например, в момент пересчета формул. Просто перемещение активной ячейки Excel таким обновлением не считает. И поэтому координатная подсветка работать не будет. Для решения проблемы нам придется искусственно обновить лист. Проще всего это сделать при помощи небольшого макроса, добавив его в свойства рабочего листа. Для этого делаем так:

Как сделать цветной курсор в excel?

Как сделать цветной курсор в excel?

Как сделать цветной курсор в excel?

1. Щелкаем правой кнопкой мышки на листе с параметрами условного форматирования. Откроется контекстное меню, как на рис. 7.

2. Из этого меню выбираем пункт «Исходный текст». Откроется окно редактора Visual Basic.

3. В этом окне вставляем такой текст:

«Private Sub Worksheet_SelectionChange(ByVal Target As Range)

ActiveCell.Calculate

End Sub».

4. Закрываем окно Visual Basic. На предложение сохранить изменения отвечаем утвердительно.

Важно! Текст модуля на Visual Basic нужно вводить без окаймляющих кавычек.

Теперь при любом перемещении активной ячейки будет активировано условное форматирование, а на листе появится координатное выделение строк и колонок, как показано на рис. 8. Задача решена.

Посмотрим, что мы получили на самом деле, каковы достоинства и недостатки нашего подхода. Вначале о преимуществах, среди которых я бы указал такие:

—  инструмент условного форматирования не нарушает функционал таблицы, работают все приемы копирования, перемещения ячеек;

—  работа с условными форматами не нарушает форматирование таблицы;

—  наш вариант реализации координатной подсветки правильно работает с таблицами, где есть объединенные ячейки, а это для бухгалтера очень важно;

—  макросы на VBA нужны в минимальном объеме, прикрепить их к рабочему листу не составляет труда.

Что касается недостатков, они тоже есть, в частности:

—  формулу для условного форматирования нужно создавать вручную;

—  нет способа быстро включить или отключить координатную подсветку на рабочем листе — для этого нужно удалить правило условного форматирования, а это потребует времени;

—  при копировании ячеек с других рабочих книг или листов для них придется восстанавливать правила условного форматирования.

На мой взгляд, указанные проблемы не относятся к разряду существенных. По личному опыту скажу, что работа с координатным вычислением на базе условного форматирования не вызывает никаких проблем. Тем не менее имеет смысл посмотреть и на другие способы решения задачи. Чем мы сейчас и займемся.

Способ 2. Применяем надстройку «FollowCellPointer»

В результате пятнадцатиминутного общения с Google я обнаружил по меньшей мере десяток вариантов для реализации координатной подсветки с использованием макросов на VBA. Все они отличались в деталях, но принцип был один: для обозначения строки и колонки эти макросы использовали выделение несвязных диапазонов. В ручном режиме это можно сделать, нажав клавишу «Ctrl», а затем щелчком мышки выделить строку и колонку. Такие варианты я отбросил без сожаления — когда на листе выделен несвязный диапазон, не работают операции копирования и перемещения ячеек. А это — огромный недостаток при работе с таблицей. Да и углубляться в тонкости работы с VBA, откровенно говоря, не хотелось бы. Но одна ссылка меня заинтересовала. Речь шла о готовой надстройке «FollowCellPointer», которую раздает на своем сайте Jan Karel Pieterse (Нидерланды). Продукт этот бесплатный, построен он на макросах Excel и позволяет рисовать на листе графические линии для обозначения строки и колонки активной ячейки.

Прежде чем познакомится с этой программой, ее нужно скачать. Для этого делаем так:

1. Заходим на сайт и щелкаем на гиперссылке «free utilities» (рис. 9). Откроется раздел загрузок, который оформлен в виде таблицы.

2. В предложенном перечне находим программу «FollowCellPointer» (рис. 9) и щелкаем на ссылке левой кнопкой мышки. Через некоторое время в папке загрузок вашего браузера появится файл «followcellpointer.zip».

3. Копируем этот файл в любую папку и распаковываем его. Все, надстройка готова для инсталляции.

Важно! Для работы с файлом «followcellpointer.zip» на вашем компьютере должна быть установлена программа-архиватор (WinRar, WinZip или аналогичная).

В подавляющем большинстве случаев такая программа есть. И тогда для распаковки достаточно щелкнуть на имени файла левой кнопкой мышки, затем выбрать из контекстного меню «Извлечь все…» или «Распаковать в текущую папку». В результате в этой папке появится файл «FollowCellPointer.xla». Щелчком мышки загружаем его в MS Excel. Надстройка готова к работе.

Важно! Для работы надстройки в Excel 2010 скопируйте файл «FollowCellPointer.xla» в системную папку дополнений MS Office. По умолчанию путь к этой папке выглядит так: «C:Users…AppDataRoamingMicrosoftAddIns». В этой строке вместо символа «…» нужно поставить имя пользователя для вашей учетной записи Windows.

Дальше делаем так:

1. Открываем или создаем новый документ.

2. Вызываем меню «Файл», затем щелкаем на пункт «Параметры».

3. В окне настроек Excel переходим в раздел «Надстройки» и нажимаем кнопку «Перейти…» (рис. 10). Откроется одноименное окно «Надстройки», как на рис. 10.

4. В этом окне ставим «галочку» возле строки «FollowCellPointer».

5. В окне «Надстройки» нажимаем «ОК».

6. Переходим в меню «Надстройки». Лента этого меню показана на рис. 11. На ней появится дополнительная группа с иконками: «Enable», «Disable», «Anchor», «ClearAnchor», «Format».

7. Щелкаем на иконке «Enable». Возле активной ячейки появятся тонкие линии, как показано на рис. 12. На мой взгляд, весьма изящное решение, вполне заменяет координатную подсветку строк и колонок.

Чтобы отключить этот режим, щелкаем на кнопке «Disable».

Как и большинство программ, «FollowCell- Pointer» содержит ряд полезных режимов и настроек. Вот основные из них.

Инструмент «Anchor» (рис. 11) позволяет зафиксировать обозначение текущей ячейки, после чего продолжить работу в обычном режиме. Такая возможность полезна, например, при анализе связей между ячейками таблицы. Пример использования режима «Anchor» показан на рис. 13.

Кнопка «ClearAnchor» стирает отметку, сделанную в режиме «Anchor».

Последней иконкой, относящейся к «FollowCellPointer», является кнопка «Format». Щелчок на этой кнопке открывает окно «Format Arrows», изображенное на рис. 14. Несмотря на английский интерфейс, здесь все просто. Большинство параметров в этом окне позволяют изменить форму стрелок и линий для отметки текущей ячейки. Приведу вкратце основные настройки, представленные в окне «Format Arrows»:

— «Arrow head style» изменяет форму указателей на линиях, которые ведут к активной ячейке. Возможные варианты: «Diamond» — указатели выглядят как ромбики, «Open» — тонкие стрелки, «Oval» — круглые указатели, «None» — линии будут показаны без указателей, «Triangle» — указатели выглядят как заполненные стрелки (в виде треугольников);

— «Arrow head length» позволяет отрегулировать длину указателей на конце линий. Предусмотрены два варианта: «Short» — короткий, и «Long» — продолговатый;

— «Arrow head width» — здесь можно задать ширину указателя: «Narrow» — тонкий, и «Wide» — широкий;

— «Arrow line width» — этот параметр влияет на толщину линий: «1» — тонкая линия, «2» — линия с полужирным начертанием;

— «Transparency» изменяет способ рисования линий. Параметр может принимать два значения: «Opaque» — рисовать обычные линии, «Transparent» — рисовать полупрозрачные линии.

Кнопка «Line Color» (рис. 14) позволяет выбрать цвет линии из стандартной палитры MS Excel.

Разумеется, настройка параметров — дело сугубо индивидуальное. Мне понравился вариант с полупрозрачными линиями и округлыми окончаниями. А подробный состав моих настроек выглядит так: «Arrow head length» = «Short», «Arrow head width» = «Narrow», «Arrow line width» = «1», «Transparency» = «Transparent».

На сегодня все. Надеюсь, что материал этой статьи сделает вашу работу с большими таблицами проще и удобнее. До новых встреч!

Жду ваших вопросов, замечаний и предложений на bk@id.factor.ua, nictomkar@rambler.ru или на форуме редакции www.bk.factor.ua/forum.

Сегодня мы отвлечемся от формул и макросов, а уделим немного внимания оформлению панели задач. Знали ли вы что можно изменить привычный цвет ленты команд для Excel 2007 и выше? Вот и я узнал об этом только сегодня, как говорится, век живи — век учись. Я сразу же поменял цвет панели на темно-серую схему, т.к. стандартная голубая, порядком поднадоела. Цветовая схема в Excel, как изменить?

Начиная с Excel 2007  разработчики начали задумываться и над дизайном редактора. Теперь вы можете не только скрывать панель инструментов, но и менять ее цвет. Хотя выбор оформления пока небольшой, это все-таки лучше чем ничего.

Цветовая схема в Excel. Как менять?

Изменить вы сможете зайдя в меню Файл, Параметры — раздел Основные в опции «Цветовая схема» указать желаемую цветовую схему из выпадающего списка, как показано на рисунке ниже.

В 2007 и 2010 версиях программы вы можете выбрать из трех вариантов: синяя, серебристая или черная.

Для Excel 2013 цвета/оттенки уже более современные и стильные — белая, светло-серая или темно-серая.

На моем Excel 2016 я уже изменил оформление ленты на темно-серое, при прочих данных: зеленой и белой. Правда в этой версии редактора, такая возможность называется «Тема Office», интересно, чем не устраивало название «Цветовая схема».

Честно говоря, меня очень удивило, что я не знал или забыл о этой возможности (сами знаете плохо, когда не знаешь, да еще и забудешь), что я решил сделать отдельную запись об этом — вдруг кому-то это тоже покажется любопытным. После чего немного полазил в интернете и не нашел, как увеличить количество данных цветов, если кто знает, интересно, напишите в комментариях.

Тема документа Excel, PowerPoint или Word

Изменение цвета панели инструментов (Цветовой схемы) нельзя путать с изменением цветовой темы документа. Пройдите на вкладку Разметка страницы и в разделе Темы можно выбрать тему с определенным стилем цветов, таблиц и диаграмм или же выбрать отдельные цвета оформления документа — файл будет выглядеть в едином стиле.

Очень часто я использую эту возможность MS Office в PowerPoint при создании моих презентаций — т.к. это делает ее более стильной или в Word для единообразного описания сделанной работы в Excel.

Поделитесь нашей статьей в ваших соцсетях:

(Visited 3 177 times, 1 visits today)

В сегодняшней статье мы рассмотрим, как с помощью небольшого макроса и условного форматирования создать ролловер эффект в Excel. Данный эффект используется для подсвечивания элемента при наведении мышки на кнопку или ссылку. В нашем случае мы реализуем работу Excel таким образом, чтобы при наведении курсора на ячейку, цвет фона менялся.

Данная технология описана на сайте Джордана Голдмайера optionexplicitvba

Зачем вообще использовать ролловер эффект? Основная идея в том, чтобы отобразить какую-нибудь информацию или выделить элемент интерфейса во время наведения на него мышкой. В первом случае данный функционал уже реализован с помощью комментариев. Но в поддержку данной методики скажу, что комментирование ограничено теми инструментами, которые предоставляет нам Excel, в то время как написание макросов ограничено лишь нашей фантазией. Плюс ко всему, данную технику можно использовать для реализации интересных дизайнерских решений.

Итак, преступим. Нам понадобится функция ГИПЕРССЫЛКА, которая создает ссылку и позволяет перейти на документ или страницу, находящуюся на сетевом диске или интернет. Данная функция имеет следующий синтаксис:

ГИПЕРССЫЛКА(адрес, )

где,

Адрес – путь или имя открываемого документа. Может быть как адресом на жестком диске, так и URL сайта.

Имя – необязательный аргумент, текст ссылки, под которым мы можем скрыть адрес.

В ячейке B3, к которой мы хотим применить ролловер эффект, вводим следующую формулу:

=ГИПЕРССЫЛКА(RollOverEffect(); «Наведи курсор»)

Excel выдаст нам ошибку, не обращайте пока на нее внимание.

Далее создаем пользовательскую функцию. Для этого переходим в редактор VBA. (О редакторе VBA, вы можете прочитать в статье про создание макросов в Excel.)  И вставляем следующий код:

1
2
3

Public Function RollOverEffect()
Range(«A1»).Value = «Курсор наведен!»
End Function

Данный код будет вызываться функцией ГИПЕРССЫЛКА, каждый раз, как на ячейку будет наведен курсор. Теперь вернитесь в книгу и поместите мышь на ячейку B3. Наша пользовательская функция отработает свой код, и в ячейке A1 вы увидите надпись Курсор наведен!

Чтобы избежать выдачи ошибки #ЗНАЧ!, немного модернизируем нашу формулу и воспользуемся функцией ЕСЛИОШИБКА. Формула примет следующий вид:

=ЕСЛИОШИБКА(ГИПЕРССЫЛКА(RollOverEffect(); «Наведи курсор»); «Наведи курсор»)

Вот и все, если вы найдете интересное применение данной технике, не стесняйтесь, опишите его в комментариях, мы обязательно обсудим.

Напоследок, пример того как я использовал данную технику для подсвечивания ячейки, над которой находится курсор:

Скачать файл с примером применения ролловер эффекта в excel

Заливка ячейки цветом в VBA Excel. Фон ячейки. Свойства .Interior.Color и .Interior.ColorIndex. Цветовая модель RGB. Стандартная палитра из 56 цветов. Предопределенные константы.

  1. Свойство .Interior.Color объекта Range
  2. Заливка ячейки цветом в VBA Excel
  3. Вывод сообщений о числовых значениях цветов
  4. Использование предопределенных констант
  5. Цветовая модель RGB
  6. Свойство .Interior.ColorIndex объекта Range

Свойство .Interior.Color объекта Range

Начиная с Excel 2007 основным способом заливки диапазона или отдельной ячейки цветом (зарисовки, добавления, изменения фона) является использование свойства .Interior.Color объекта Range путем присваивания ему значения цвета в виде десятичного числа от 0 до 16777215 (всего 16777216 цветов).

Заливка ячейки цветом в VBA Excel

Пример кода 1:

  Sub ColorTest1()  Range("A1").Interior.Color = 31569  Range("A4:D8").Interior.Color = 4569325  Range("C12:D17").Cells(4).Interior.Color = 568569  Cells(3, 6).Interior.Color = 12659  End Sub  

Поместите пример кода в свой программный модуль и нажмите кнопку на панели инструментов «Run Sub» или на клавиатуре «F5», курсор должен быть внутри выполняемой программы. На активном листе Excel ячейки и диапазон, выбранные в коде, окрасятся в соответствующие цвета.

Есть один интересный нюанс: если присвоить свойству .Interior.Color отрицательное значение от -16777215 до -1, то цвет будет соответствовать значению, равному сумме максимального значения палитры (16777215) и присвоенного отрицательного значения. Например, заливка всех трех ячеек после выполнения следующего кода будет одинакова:

  Sub ColorTest11()  Cells(1, 1).Interior.Color = -12207890  Cells(2, 1).Interior.Color = 16777215 + (-12207890)  Cells(3, 1).Interior.Color = 4569325  End Sub  

Проверено в Excel 2016.

Вывод сообщений о числовых значениях цветов

Числовые значения цветов запомнить невозможно, поэтому часто возникает вопрос о том, как узнать числовое значение фона ячейки. Следующий код VBA Excel выводит сообщения о числовых значениях присвоенных ранее цветов.

Пример кода 2:

  Sub ColorTest2()  MsgBox Range("A1").Interior.Color  MsgBox Range("A4:D8").Interior.Color  MsgBox Range("C12:D17").Cells(4).Interior.Color  MsgBox Cells(3, 6).Interior.Color  End Sub  

Вместо вывода сообщений можно присвоить числовые значения цветов переменным, объявив их как Long.

Использование предопределенных констант

В VBA Excel есть предопределенные константы часто используемых цветов для заливки ячеек:

Предопределенная константа Наименование цвета vbBlack Черный vbBlue Голубой vbCyan Бирюзовый vbGreen Зеленый vbMagenta Пурпурный vbRed Красный vbWhite Белый vbYellow Желтый

Присваивается цвет ячейке предопределенной константой в VBA Excel точно так же, как и числовым значением:

Пример кода 3:

  Range("A1").Interior.Color = vbGreen  

Цветовая модель RGB

Цветовая система RGB представляет собой комбинацию различных по интенсивности основных трех цветов: красного, зеленого и синего. Они могут принимать значения от 0 до 255. Если все значения равны 0 — это черный цвет, если все значения равны 255 — это белый цвет.

Выбрать цвет и узнать его значения RGB можно с помощью палитры Excel:

Как сделать цветной курсор в excel?

Палитра Excel

Чтобы можно было присвоить ячейке или диапазону цвет с помощью значений RGB, их необходимо перевести в десятичное число, обозначающее цвет. Для этого существует функция VBA Excel, которая так и называется — RGB.

Пример кода 4:

  Range("A1").Interior.Color = RGB(100, 150, 200)  

Свойство .Interior.ColorIndex объекта Range

До появления Excel 2007 существовала только ограниченная палитра для заливки ячеек фоном, состоявшая из 56 цветов, которая сохранилась и в настоящее время. Каждому цвету в этой палитре присвоен индекс от 1 до 56. Присвоить цвет ячейке по индексу или вывести сообщение о нем можно с помощью свойства .Interior.ColorIndex:

Пример кода 5:

  Range("A1").Interior.ColorIndex = 8  MsgBox Range("A1").Interior.ColorIndex  

Просмотреть ограниченную палитру для заливки ячеек фоном можно, запустив в VBA Excel простейший макрос:

Пример кода 6:

  Sub ColorIndex()  Dim i As Byte  For i = 1 To 56  Cells(i, 1).Interior.ColorIndex = i  Next  End Sub  

Номера строк активного листа от 1 до 56 будут соответствовать индексу цвета, а ячейка в первом столбце будет залита соответствующим индексу фоном.

Готовую стандартную палитру из 56 цветов можете посмотреть здесь.

Did you find apk for android? You can find new Free Android Games and apps.

Понравилась статья? Поделить с друзьями:
  • Как выделить красную строку в документе word
  • Как выделить контуры ячеек в excel
  • Как выделить контур ячейки в excel
  • Как выделить контур таблицы в excel
  • Как выделить константы в excel