Доброго времени суток! Я столкнулся с такой проблемой, которая отнимает у меня много времени. Подскажите, как можно оптимизировать таблицу, может у кого макрос готовый завалялся. в таблице 6 столбцов 1-время 2-фамилия 3-имя 4-отчество 5-вход/выход 6-подразделение
Вопрос: Как выделить строки цветами чтобы было удобно просматривать/читать (каждый человек может проходить за день по нескольку раз) надо, чтобы выделяло цветом все выходы/входы каждого человека двумя цветами (пример: 1 - белым цветом, 2 голубым, 3 - белым, 4 - голубым и т.д.) ИЛИ вставить пустую строку между каждым человеком
Sub videlenie()
Dim lr As Integer
lr = Cells(Rows.Count, 1).End(xlUp).Row
For i = 2 To lr Step 2
For j = 1 To 6
Cells(i, j).Interior.Color = RGB(217, 217, 217)
Next
Next
End Sub
Выделяет через одну строку серым цветом, начинается со второй строки потому что первая строка это заглавие таблицы. Выделяет только столбцы A-F Не подойдет, не правильно прочитал задание.
Вот теперь сами со своего скрина набейте данные в файл, файл на форум. Скрины правда не смотрел (с работы не пускает), может там всего 10 простых строк... Ну тем быстрее сделаете.