Отмщать неразумным хазарам...
Постов: 2216
Дата регистрации: 17.10.2003 |
Уважаемые коллеги!
Требуется помощь и совет. Задумал я тут простенькую табличку в экселе заваять, где есть поля: "Компания", "Счет", "Статус клиента" и т.д. Все просто, но захотелось мне "Статус клиента" сделать красиво, чтобы не набивать каждый раз одно и тоже, а выбирать из списка. Это я сделал следующим образом: Данные-Проверка-Список (указал формат списка) - ОК. Все, теперь я могу в ячейке выбирать из списка, например: "потерянный", "в разработке", "ожидает" и т.д. Но мне захотелось, чтобы и цветом данный статус был выделен особенным. Вот сижу уже час и проблему решить не могу.
Может у кого-нибудь есть подобный опыт? Прошу делиться наработками... :) |
|
 | | Untitled-1 копи.jpg |
|
 |
0 |
 |
0 |
| Комментарий понравился? |
|
0 |
|
0 |
   06.07.2006 16:18 |  |
|
|
|
Постов: 3209
Дата регистрации: 28.10.2005 |
для: Daniel©
я когда похожую табличку делал...все красил самостоятельно, для простоты делал автофильтр...в необходимом столбце выбирал (то что нужно), фильтровал и закрашивал ВСЕ тем цветом, которым хотелось выделить именнно их, и так далее по списку..в итоге, у меня была табличка, где отдельным цветом были выделены компании в разработке, "умершие навечно", те, кого можно расшевелить и прочие. Достаточно одного беглого взгляда на таблицу, и становилось понятно, кто и где находится..и стоит ли звонить им. |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.07.2006 16:50 | |
|
|
|
Новичок
Постов: 3527
Дата регистрации: 07.06.2004 |
Выделите ячейку в которой будет условное форматирование. Выберите [Формат]->[Условное форматирование] и добавляйте свои условия. Перечисляете что чему должно быть равно/больше меньше и какое при этом должно быть форматирование. Давите Ок и ячейка перекрашивается в соответствии с условиями которые вы перечислили.
Если надо скопировать эти условности форматирования на существующие данные используйте кнопку [Формат по образцу] она вверху находится после копирования и вставки... такая типа кисточка.
Выбиреете диапазон с вашими данными, затем нажимаете на эту кисточку, затем нажимаете на ячейку, в которой вы сделали условное форматирование. И все готово
----
ответ был найден за 1 минуту, просто набрал в "Мастере ответов" вопрос "форматирование" и потом прошелся по списку. Вобщем не стесняйтесь использовать help [F1] |
|
--------
бренд "Cивой Кобылы" |
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
 06.07.2006 17:09 | |
|
|
|
Отмщать неразумным хазарам...
Постов: 2216
Дата регистрации: 17.10.2003 |
для: JhAZZ©
Спасибо! Разобрался...)))) |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.07.2006 17:29 | |
|
|
|
Отмщать неразумным хазарам...
Постов: 2216
Дата регистрации: 17.10.2003 |
Ага...эта дрянь не поддерживает больше трех вариантов форматов. А у меня их 5!
Или я чего не понимаю? |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.07.2006 17:38 | |
|
|
|
Новичок
Постов: 3527
Дата регистрации: 07.06.2004 |
| Ну тады вам в Visual Basic там можно все. По нему нужны рекомендации? Естественно у всех при открытии такого файла excel будет ругаться на наличие макросов |
|
--------
бренд "Cивой Кобылы" |
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.07.2006 17:44 | |
|
|
|
Cupio omnia, quae vis
Постов: 2451
Дата регистрации: 18.02.2005 |
для: Daniel©
Ждите когда Арсений прийдет, он в таблицах Дока. :) |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.07.2006 17:52 | |
|
|
|
Новичок
Постов: 3527
Дата регистрации: 07.06.2004 |
Выберите диапазон по которому надо сделать поиск. Я сделал его вертикальным если надо, то можно и по горизонтали развернуть. Называем этот диапазон "мойдиапазон". Затем делаем проверку на значения: знач1, знач2, знач3 ... и т.д. В соответствии с этим ставим разный ColorIndex
Ставите кнопку на лист и просите создать макрос. Когда его вам создадут впишите этот код. Строчки с Sub и End Sub - убрать. Их я оставил для понимания
Sub Кнопка1_Щелкнуть()
For i = 1 To Range("мойдиапазон").Rows.Count
c = Range("мойдиапазон").Cells(i, 1)
If c = "знач1" Then cl = 2
If c = "знач2" Then cl = 3
If c = "знач3" Then cl = 4
If c = "знач4" Then cl = 5
Range("мойдиапазон").Cells(i, 1).Interior.ColorIndex = cl
Next i
End Sub
|
|
|
--------
бренд "Cивой Кобылы" |
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.07.2006 18:21 | |
|
|
|
Отмщать неразумным хазарам...
Постов: 2216
Дата регистрации: 17.10.2003 |
для: Vopros Sostavy©
Он не придет! У него день рождения!...  |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.07.2006 18:21 | |
|
|
|
Новичок
Постов: 3527
Дата регистрации: 07.06.2004 |
| точно! Как же VS Мог это забыть. Сегодня же день рождения у Арсения! |
|
--------
бренд "Cивой Кобылы" |
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.07.2006 18:22 | |
|
|
|
Отмщать неразумным хазарам...
Постов: 2216
Дата регистрации: 17.10.2003 |
для: JhAZZ©
Огромное человеческое спасибо! Все заработало... :) |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.07.2006 18:26 | |
|
|
|
Новичок
Постов: 3527
Дата регистрации: 07.06.2004 |
| JhAZZ налил человеческое спасибо в кружку и залпом выпил |
|
--------
бренд "Cивой Кобылы" |
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.07.2006 18:28 | |
|
|
|
Постов: 151
Дата регистрации: 17.05.2006 |
| Cпасибо Daniel©[/b], что спросил и спасибо JhAZZ©[/b], что ответил. Много полезного для себя почерпнула. |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
07.07.2006 09:43 | |
|
|
|
Постов: 589
Дата регистрации: 08.12.2005 |
для: Milka© , присоединяюсь
А Арсений так и не пришел...  |
|
--------
Нет, не буду рисовать на песке -
Мечты смоет.
Начинаю строить собственный миф!
на скале у Прибоя... |
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
07.07.2006 13:51 | |
|
|
|
статусная
Постов: 204
Дата регистрации: 18.04.2006 |
| а что, в книжках не написано? Daniel© ;) |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
18.07.2006 12:45 | |
|
|
|
Отмщать неразумным хазарам...
Постов: 2216
Дата регистрации: 17.10.2003 |
для: zeliboba©
А вот это как раз тот вопрос, который не является базовым в работе с программой и его можно либо не знать, либо забыть. Не надо меня передергивать уважаемая...  |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
18.07.2006 13:08 | |
|
|
|
статусная
Постов: 204
Дата регистрации: 18.04.2006 |
| для: Daniel© не надо нервничать :) Смех продлевает жизнь ;) |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
18.07.2006 14:27 | |
|
|
|
Новичок
Постов: 3527
Дата регистрации: 07.06.2004 |
для: zeliboba©
Этого не написано в книжках. В свое время делал комплексную систему оптимизации стратегии запуска сотовых сетей на "северах". В екзеле на 486DX100MHz расчитывалось около сотни вариантов бизнес-планов и искались наиболее оптимальные варианты тарификации и инвестирования. За два года было рождено 3 оптимальных бизнес-решения для сотовиков... с тех пор (9 лет назад) я хорошо знаю екзел и жутко его ненавижу. |
|
--------
бренд "Cивой Кобылы" |
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
19.07.2006 01:18 | |
|
|
|
гость
Постов: 1
Дата регистрации: 01.09.2006 |
Доброго всем времени.
Нужна подсказка по Excel. Я вообще с ним не работаю практически, потому не знаю. Но вот понадобилось автоматизировать маленький процесс. Ситуация такова: из некоторой программы делается периодическая выгрузка данных в формате таблицы Excel. Затем эти данные переносятся в некую сводную таблицу. Некоторые данные в начальной программе имеют числовой формат, выгружаются же в таблицу в текстовом (особенности написания программы). В сводной же таблице требуется размещение данных именно в числовом формате (в т.ч. с десятичными дробями). Эти данные размещаются в определённых столбцах. Возможно ли автоматизировать форматирование данных в этих столбцах в числовой формат? |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
01.09.2006 09:49 | |
|
|
|
Ride the lightning
Постов: 2245
Дата регистрации: 08.08.2006 |
| А смысл всех этих телодвижений? Может быть, потратить полдня на освоение Access? Там этот вопрос реализован до неприличия просто. |
|
|
0 |
|
0 |
| Комментарий понравился? |
|
0 |
|
0 |
06.09.2006 23:02 | |
|
|
|
