Чередование цвета в строках таблицы | |
Как включить режим разработчика Excel | |
Примеры программ VBA в Excel | |
Корректная сортировка чисел в Excel | |
Горячие клавиши для специальной вставки |
Цветной выпадающий список | |
Всё пропало | |
Перенос строки внутри ячейки Excel | |
Excel не фильтрует - как исправить |
1) Выделим область в которой нужно сделать чередование цвета. Я выбрал всю таблицу.
2) Переходим: Home - Conditional Formating - New Rule (рус. Условное форматирование - Новое правило)
3) Выбираем Use a formula to determine which cells to format
(рус. Использовать формулу для определения форматируемых ячеек)
В качестве формулы пишем
=MOD(ROW(),2)=0
Эта формула указывает обрабатывать только те строки остаток от деления номера которых на
два равен нулю.
Если вы хотите выделять, нампример, каждую десятую строку, замените
в формуле 2 на 10. Затем переходим к заданию форматирования (Format)
4) Выбираем как именно мы хотим форматировать ячейки. В данном случае раскрашиваем их в серый цвет.
5) Применяем изменения, нажав ОК
6) Оцениваем результат
Возможные проблемы:
Если во время выделения (шаг номер « 1) ») вы захватили ячейки с выпадающим
списком, скорее всего, метод не сработает. Попробуйте изменить область выделения или
воспользуйтесь другим методом. Они перечислены
здесь
File - Options
File - Options - Customize Ribbon
File - Options - Customize Ribbon - Developer
Вкладка Разработчик (Developer) должна появиться в ленте
После того, как режим разработчика включен мы можем начать писать программы.
Sub fill_cells()
Dim i As Integer
For i = 1 To 1000
Cells(i, 7).Value = "&#"
Cells(i, 8).Value = i
Cells(i, 9).Value = ";"
Next i
End Sub
Очень часто Excel сортирует следующим оригинальным образом:
1, 10, 11, 12, 2, 21, 3, 33, 34, 8, 9
Т.е он считает, что 10 меньше чем 2.
Вы прочитали совет о том, что нужно форматировать все ячейки либо в числовой формат либо
в текстовый, сделали это, но ничего не изменилось.
Иногда может помочь следущее:
нужно совершить арифметическое действие над столбцом, значения которого нужно
отсортировать.
Можно сделать это растянув формулу за угол ячейки, либо, если
значений слишком много, написать VBA скрипт, предварительно включив
режим разработчика
Предположим, что сортировать нужно 3000 строк по столбцу B
Sub fill_cells()
Dim i As Integer
For i = 1 To 3000
Cells(i, 3).Value = (Cells(i, 2).Value)/1000
Next i
End Sub
Теперь у нас есть столбец C в котором те же числа, что и в B но поделённые на 1000. Выделяем его, переходим на вкладку Data и сортируем.
Если копировать текст из внешнего источнка часто бывает нужно вставить его в ячейку так, чтобы
формат соответсвовал уже существующему.
Для этого можно вызвать контекстное меню и там выбрать Paste Special →
Match Destination Formatting
Для нескольких применений удобно, но в случае, когда нужно делать это постоянно лучше пользоваться сочетанием клавиш.
CTRL + V
Затем отдельно
CTRL
И отдельно
m
VBA | Changing Line Colors |
Developers Mode | Dropdown List with Different Colors |
Sorting Numbers | Blank Workspace |
Share in social media:
|