Текущая страница: 6 (всего у книги 11 страниц) [доступный отрывок для чтения: 8 страниц]
Повысив частоты чипсета и шин, можно поднять их производительность, однако на практике чаще возникает необходимость установить фиксированные значения этих частот, чтобы избежать их чрезмерного повышения при разгоне процессора.
НТ Frequency (LDT Frequency, НТ Link Speed)С помощью этого параметра изменяется частота шины НТ (HyperTransport), по которой обмениваются данными процессоры компании AMD с чипсетом. В качестве значений данного параметра могут использоваться множители, и для расчета фактической частоты следует умножить выбранный множитель на значение базовой частоты (200 МГц). А в некоторых версиях BIOS вместо множителей нужно выбирать частоту шины НТ из нескольких доступных значений.
Для процессоров семейства Athlon 64 максимальная частота НТ была равна 800-1000 МГЦ (множитель 4 или 5), а для процессоров Athlon П/Phenom II – 1800-2000 МГЦ (множитель 9 или 10). При разгоне множитель для шины НТ иногда придется понижать, чтобы после поднятия базовой частоты частота НТ не вышла за допустимые пределы.
AGP/PCI ClockПараметр устанавливает частоты шин AGP и PCI.
Возможные значения:
□ Auto – частоты выбираются автоматически;
□ 66.66/33.33, 72.73/36.36, 80.00/40.00 – частота шин AGP и PCI соответственно. Стандартным является значение 66.66/33.33, а другие могут использоваться при разгоне.
PCIE Clock (PCI Express Frequency (MHz))Параметр позволяет вручную изменять частоту шины PCI Express.
Возможные значения:
□ Auto – установлена стандартная частота (обычно 100 МГц);
□ от 90 до 150 МГц – частоту можно задать вручную, а диапазон регулировки зависит от модели системной платы.
CPU Clock Skew (MCH/ICH Clock Skew)Параметры позволяют регулировать смещение тактовых сигналов процессора (CPU), а также северного (МСН) и южного (ICH) мостов.
Возможные значения:
□ Normal – будет автоматически установлено оптимальное значение (рекомендуется для нормального режима работы и умеренного разгона);
□ от 50 до 750 – величина смещения тактовых сигналов в пикосекундах. Подбор этого параметра может улучшить стабильность системы при разгоне.
FSB Strap to North BridgeПараметр используется в некоторых платах для установки режима работы северного моста чипсета в зависимости от частоты FSB.
Возможные значения:
□ Auto – параметры чипсета настраивается автоматически (это значение рекомендуется для работы компьютера в штатном режиме);
□ 200 MHz, 266 MHz, 333 MHz, 400 MHz – частота FSB, для которой устанавливается режим работы чипсета. Более высокие значения увеличивают максимально возможную частоту FSB при разгоне, но снижают производительность чипсета. Оптимальное значение параметра при разгоне обычно приходится подбирать экспериментально.
Регулировка напряжения питания чипсетаКроме напряжения питания процессора и памяти, некоторые системные платы также позволяют регулировать напряжение компонентов чипсета и уровни сигналов. Название соответствующих параметров может быть различным в зависимости от производителя платы. Вот несколько примеров:
□ Chipset Core PCIE Voltage;
□ MCH & PCIE 1.5V Voltage;
□ PCH Core (PCH 1,05/1,8);
□ NF4 Chipset Voltage;
□ PCIE Voltage;
□ FSB OverVoltage Control;
□ NВ Voltage (NBVcore);
□ SB I/O Power;
□ SB Core Power.
Практика показывает, что изменение указанных напряжений в большинстве случаев не дает заметного эффекта, поэтому оставляйте для этих напряжений значение Auto (Normal).
Spread SpectrumПри работе компонентов современного компьютера на высоких частотах возникает нежелательное электромагнитное излучение, которое может быть источником помех для различных электронных устройств. Чтобы несколько уменьшить величину импульсов излучения, применяют спектральную модуляцию тактовых импульсов, что делает излучение более равномерным.
Возможные значения:
□ Enabled – режим модуляции тактовых импульсов включен, что немного снижает уровень электромагнитных помех от системного блока;
□ 0.25 %, 0.5 % – уровень модуляции в процентах (задается в некоторых версиях BIOS);
□ Disabled – режим Spread Spectrum отключен.
СОВЕТ
Для стабильной работы системы при разгоне всегда отключайте Spread Spectrum.
В некоторых моделях системных плат есть несколько самостоятельных параметров, управляющих режимом Spread Spectrum для отдельных компонентов системы, например CPU Spread Spectrum, SATA Spread Spectrum, PCIE Spread Spectrum и др.
Перед разгоном обязательно предпримите несколько важных шагов.
□ Проверьте стабильность работы системы в штатном режиме. Нет никакого смысла разгонять компьютер, который в обычном режиме склонен к сбоям или зависаниям, поскольку разгон только усугубит эту ситуацию.
□ Найдите все необходимые параметры BIOS, которые понадобятся при разгоне, и разберитесь с их назначением. Эти параметры были описаны выше, но для разных моделей плат они могут различаться, и для учета особенностей конкретной платы нужно изучить инструкцию к ней.
□ Разберитесь со способом обнуления BIOS для вашей модели платы (см. гл. 5). Это необходимо, чтобы сбросить настройки BIOS при неудачном разгоне.
□ Проверьте рабочие температуры основных компонентов и их охлаждение. Для контроля температур можно использовать диагностические утилиты с компакт-диска к системной плате или же программы независимых разработчиков: EVEREST, SpeedFan (www.almico.com) и др. Чтобы улучшить охлаждение, возможно, придется заменить процессорный кулер на более мощный, а также принять меры для улучшения охлаждения чипсета, видеоадаптера и оперативной памяти.
Семейство процессоров Intel Core 2 является одним из наиболее удачных за всю историю компьютерной индустрии благодаря высокой производительности, невысокому тепловыделению и отличному разгонному потенциалу. Начиная с 2006 года компания Intel выпустила десятки моделей процессоров этого семейства под различными торговыми марками: Core 2 Duo, Core 2 Quad, Pentium Dual-Core и даже Celeron.
Для разгона процессоров Core 2 необходимо повышать частоту FSB, штатное значение которой может составлять 200, 266, 333 или 400 МГц. Точное значение частоты FSB вы можете узнать в спецификации к вашему процессору, однако не забывайте, что частота FSB указывается с учетом четырехкратного умножения при передаче данных. Например, для процессора Core 2 Duo Е6550 2,33 ГГц (1333 МГц FSB) реальное значение частоты FSB составляет 1333: 4 = 333 МГц.
При повышении частоты FSB будут автоматически повышаться частоты работы оперативной памяти, чипсета, шин PCI/PCIE и других компонентов. Поэтому перед разгоном следует принудительно их уменьшить, чтобы узнать максимальную рабочую частоту процессора. Когда же она будет известна, можно подобрать оптимальные рабочие частоты для других компонентов.
Последовательность разгона может быть такой.
1. Установите оптимальные настройки BIOS для вашей системы. Выберите значение Disabled (Off) для параметра Spread Spectrum, который не очень совместим с разгоном. Таких параметров у вас может оказаться несколько: для процессора (CPU), шины PCI Express, интерфейса SATA и др.
2. На время выполнения разгона отключите технологии энергосбережения Intel SpeedStep и С1Е Support. После завершения всех экспериментов можно снова включить эти функции для уменьшения энергопотребления процессора.
3. Установите вручную частоты шин PCI/PCIE. Для шины PCI следует установить частоту 33 МГц, а для PCI Express лучше задать значение в пределах 100-110 МГц. В некоторых моделях плат при значении Auto или паспортном значении 100 МГц результаты могут получиться хуже, чем при нестандартном значении частоты 101 МГц.
4. Уменьшите частоту работы оперативной памяти. В зависимости от модели платы это можно сделать одним из двух способов:
■ установить минимальное значение частоты оперативной памяти с помощью параметра Memory Frequency или подобного (для доступа к этому параметру, возможно, понадобится отключить автоматическую настройку памяти);
■ установить минимальное значение множителя, определяющего соотношение частоты FSB и памяти, с помощью параметра FSB/Memory Ratio, System Memory Multiplier или аналогичного.
Поскольку способы изменения частоты памяти в разных платах различаются, рекомендуется перезагрузить компьютер и с помощью диагностических утилит EVEREST или CPU-Z убедиться, что частота памяти действительно уменьшилась.
5. После подготовительных действий можно приступать непосредственно к процедуре разгона. Для начала можно поднять частоту FSB на 20-25 % (например, с 200 до 250 МГц или с 266 до 320 МГц), после чего попробовать загрузить операционную систему и проверить ее работу. Параметр для установки может называться CPU FSB Clock, CPU Overclock in MHz или как-то по-другому.
ПРИМЕЧАНИЕ
Для получения доступа к ручной регулировке FSB вам, возможно, придется отключить автоматическую установку частоты процессора (параметр CPU Host Clock Control) или динамический разгон системной платы. Например, в системных платах ASUS следует выбрать для параметра AI Overclocking (AI Tuning) значение Manual.
6. С помощью утилиты CPU-Z проверьте реальные рабочие частоты процессора и памяти, чтобы убедиться в правильности ваших действий (рис. 6.3). Обязательно контролируйте рабочие температуры и напряжения. Запустите 1-2 тестовые программы и убедитесь, что нет сбоев и зависаний.
7. Если проверка разогнанного компьютера прошла без сбоев, можно его перезагрузить, повысить частоту FSB на 5 или 10 МГц, после чего снова проверить работоспособность. Продолжайте до тех пор, пока система не даст первый сбой.
8. При возникновении сбоя можно уменьшить частоту FSB, чтобы вернуть систему в стабильное состояние. Но если вы хотите узнать предельную частоту процессора, нужно повышать напряжение питания ядра с помощью параметра CPU VCore Voltage или CPU Voltage. Изменять напряжение питания нужно плавно и не более чем на 0,1-0,2 В (до 1,4-1,5 В). Тестируя компьютер с увеличенным напряжением питания процессора, следует обязательно обратить внимание на его температуру, которая не должна быть больше 60 °С. Окончательная цель этого этапа разгона – найти максимальную частоту FSB, при которой процессор может работать длительное время без сбоев и перегрева.
9. Подберите оптимальные параметры оперативной памяти. На шаге 4 мы уменьшили ее частоту, однако с увеличением частоты FSB частота памяти также увеличилась. Фактическое значение частоты памяти можно рассчитать вручную или определить с помощью утилит EVEREST, CPU-Z и др. Для ускорения памяти можно повышать ее частоту или уменьшать тайминги, а для проверки стабильности – использовать специальные тесты памяти: утилиту MemTest или встроенные тесты памяти в диагностических программах EVEREST и подобных.
Рис. 6.3. Контроль реальной частоты процессора в программе CPU-Z
10. После того как процессор разогнан и подобраны оптимальные параметры шины памяти, следует всесторонне протестировать скорость разогнанного компьютера и стабильность его работы.
До 2010 года самыми популярными являлись процессоры Intel Core 2, но к этому времени конкурирующие модели от AMD практически догнали их по производительности и к тому же продавались по более низким ценам. Однако еще в конце 2008 года Intel разработала процессоры Core i7 с совершенно новой архитектурой, но они выпускались небольшими партиями и стоили очень дорого. И только в 2010 году ожидается приход чипов с новой архитектурой в массы. Компания планирует выпускать несколько моделей для всех сегментов рынка: Core i7 – для производительных систем, Core i5 – для среднего сегмента рынка и Core i3 – для систем начального уровня.
Порядок разгона процессоров Intel Core i3/5/7 не очень отличается от разгона чипов Core 2, но для получения хороших результатов следует учитывать основные особенности новой архитектуры: перенос контроллера памяти DDR3 непосредственно в процессор и замену шины FSB новой последовательной шиной QPI. Сходные принципы уже давно используются в процессорах AMD, правда, компания Intel выполнила все на очень высоком уровне, и на момент выхода книги производительность процессоров Core i7 является недосягаемой для конкурентов.
Для установки рабочих частот процессора, оперативной памяти, модулей памяти, контроллера DDR3, кэш-памяти и шины QPI используется принцип умножения базовой частоты 133 МГц (BCLK) на определенные коэффициенты. Поэтому основной метод разгона процессоров – повышение базовой частоты, правда, при этом будут автоматически повышаться частоты всех других компонентов. Как и в случае с разгоном Core 2, необходимо предварительно понизить коэффициент умножения оперативной памяти, чтобы после увеличения базовой частоты частота памяти не стала слишком высокой. Корректива множителей для шины QPI и контроллера DDR3 может понадобиться при экстремальном разгоне, а в большинстве случаев эти компоненты будут нормально работать при повышенных частотах.
Исходя из сказанного выше, примерный порядок разгона системы на базе Core i3/5/7 может быть таким.
1. Установите оптимальные настройки BIOS для вашей системы. Отключите параметр Spread Spectrum, технологии энергосбережения Intel SpeedStep и С1Е Support, а также технологию Intel Turbo Boost.
2. Установите минимальный коэффициент умножения для оперативной памяти с помощью параметра System Memory Multiplier или аналогичного. В большинстве плат минимально возможным является множитель 6, который соответствует частоте 800 МГц в штатном режиме. В платах ASUS для этих целей используется параметр DRAM Frequency, для которого следует установить значение DDR3-800 MHz.
3. После подготовительных действий можно приступить к повышению базовой частоты с помощью параметра BCLK Frequency или аналогичного. Начать можно с частоты 160-170 МГц, а затем ступенчато повышать ее на 5-10 МГц. Как показывает статистика, для большинства процессоров удается поднять базовую частоту до 180-220 МГц.
4. При возникновении первого сбоя можно немного уменьшить базовую частоту, чтобы вернуть систему в рабочее состояние, и тщательно протестировать ее на стабильность. Если же вы хотите выжать из процессора максимум возможного, можете попробовать повысить напряжение питания на 0,1-0,3 В (до 1,4-1,5 В), но при этом следует позаботиться о более эффективном охлаждении. В некоторых случаях увеличить разгонный потенциал системы можно с помощью поднятия напряжения шины QPI и кэш-памяти L3 (Uncore), оперативной памяти или системы фазовой автоподстройки частоты процессора (CPU PLL).
5. После определения частоты, на которой процессор может работать длительное время без сбоев и перегрева, можно подобрать оптимальные параметры оперативной памяти и других компонентов.
В середине 2000-х годов компания AMD выпускала неплохие для того времени процессоры семейства Athlon 64, но вышедшие в 2006 году процессоры Intel Core 2 превзошли их по всем параметрам. Выпущенным в 2008 году процессорам Phenom так и не удалось догнать по производительности Core 2, и лишь в 2009 году процессоры Phenom II смогли на равных соперничать с ними. Однако к этому времени у Intel уже был готов Core i7, а чипы от AMD применялись в системах начального и среднего уровня.
Разгонный потенциал процессоров AMD немного ниже, чем у Intel Core, и зависит от модели процессора. Контроллер памяти находится непосредственно в процессоре, а связь с чипсетом осуществляется по специальной шине HyperTransport (НТ). Рабочая частота процессора, памяти и шины НТ определяется путем умножения базовой частоты (200 МГц) на определенные коэффициенты.
Для разгона процессоров AMD в основном используется метод повышения базовой частоты процессора, при этом автоматически будет повышаться частота шины HyperTransport и частота шины памяти, поэтому их нужно будет уменьшить перед началом разгона. Также в ассортименте компании имеются модели с разблокированным множителем (серия Black Edition), и разгон таких чипов можно выполнить, увеличив коэффициент умножения; при этом нет необходимости корректировать параметры оперативной памяти и шины НТ.
Разгонять процессоры Athlon, Phenom или Sempron можно в такой последовательности.
1. Установите оптимальные для вашей системы настройки BIOS. Отключите технологии Cool"n"Quiet и Spread Spectrum.
2. Уменьшите частоту оперативной памяти. Для этого, возможно, сначала придется отменить установку параметров памяти с помощью SPD (параметр Memory Timing by SPD или аналогичный), а затем указать минимально возможную частоту в параметре Memory Frequency for или подобном (рис. 6.4).
3. Уменьшите частоту шины HyperTransport с помощью параметра НТ Frequency или аналогичного (рис. 6.5) на 1-2 ступени. Например, для процессоров Athlon 64 номинальная частота НТ составляет 1000 МГц (множитель 5) и вы можете понизить ее до 600-800 МГц (множитель 3 или 4). Если в вашей системе имеется параметр для установки частоты встроенного в процессор контроллера памяти, например CPU/NB Frequency, его значение также рекомендуется уменьшить.
4. Установите фиксированные значения частот для шин PCI (33 МГц), PCI Express (100-110 МГц) и AGP (66 МГц).
5. После всех перечисленных действий можно приступать к самому разгону. Для начала можно поднять базовую частоту на 10-20 % (например, с 200 до 240 МГц), после чего попробовать загрузить операционную систему и проверить ее работу. Параметр для установки может называться CPU FSB Clock, CPU Overclock in MHz или аналогично.
Рис. 6.4. Установка частоты оперативной памяти
Рис. 6.5. Уменьшение рабочей частоты шины HyperTransport
6. С помощью утилиты CPU-Z проверьте реальные рабочие частоты процессора и памяти. Если проверка разогнанного компьютера прошла без сбоев, можно продолжать повышать базовую частоту на 5-10 МГц.
7. При возникновении сбоя можно уменьшить базовую частоту, чтобы вернуть систему в стабильное состояние, или продолжить разгон с повышением напряжения питания ядра (рис. 6.6). Изменять напряжение питания нужно плавно и не более чем на 0,2-0,3 В. Тестируя компьютер с увеличенным напряжением питания процессора, обратите внимание на температуру процессора, которая не должна быть выше 60 °С.
Рис. 6.6. Увеличение напряжения питания ядра процессора
8. Завершив разгон процессора, установите оптимальную частоту шины НТ, оперативной памяти и ее контроллера, выполните тестирование скорости и стабильности разогнанного компьютера. Для снижения нагрева процессора включите технологию Cool"n"Quiet и проверьте стабильность работы в этом режиме.
В семействе процессоров AMD Phenom II, которые вышли в 2009 году, имеются различные модели с двумя, тремя и четырьмя ядрами. Двух-и трехъядерные модели компания AMD выпускала путем отключения одного или двух ядер в четырехъядерном процессоре. Объяснялось это соображениями экономии: если в одном из ядер четырехъядерного процессора обнаруживался дефект, его не выбрасывали, а отключали дефектное ядро и продавали как трехъядерный.
Как выяснилось позже, заблокированное ядро можно включить с помощью BIOS, а некоторые из процессоров, подвергшихся разблокировке, могут нормально работать со всеми четырьмя ядрами. Этот феномен можно объяснить тем, что со временем брака при производстве четырехъядерных процессоров стало меньше, а поскольку на рынке существовал спрос на двух– и трехъядерные модели, производители могли принудительно отключать и вполне рабочие ядра.
На момент выхода книги было известно об успешных разблокировках большинства моделей этого семейства: Phenom II Х3 серии 7хх, Phenom II Х2 серии 5хх, Athlon II ХЗ серии 7хх, Athlon II ХЗ серии 4хх и некоторых других. В четырехъядерных моделях Phenom II Х4 8хх и Athlon II Х4 6хх есть вероятность разблокировки кэш-памяти L3, а в одноядерном Sempron 140 – второго ядра. Вероятность разблокировки зависит не только от модели, но и от партии, в которой выпущен процессор. Встречались партии, в которых можно было разблокировать больше половины процессоров, а в некоторых партиях разблокировке поддавались лишь редкие экземпляры.
Для разблокировки необходимо, чтобы в BIOS системной платы присутствовала поддержка технологии Advanced Clock Calibration (АСС). Эту технологию поддерживают чипсеты AMD с южным мостом SB750 или SB710, а также некоторые чипсеты компании NVIDIA, например GeForce 8200, GeForce 8300, nForce 720D, nForce 980.
Сама процедура разблокировки несложная, вам достаточно установить значение Auto для параметра Advanced Clock Calibration или аналогичного. В некоторых платах от MSI следует также включить параметр Unlock CPU Core. В случае неудачи вы можете попробовать настроить АСС вручную, экспериментально подобрав значение параметра Value. Иногда после включения АСС система может вообще не загрузиться, и вам придется обнулять содержимое CMOS с помощью перемычки (см. гл. 5). Если никакими методами вам не удалось разблокировать процессор, отключите АСС, и процессор будет работать в штатном режиме.
Проверить параметры разблокированного процессора можно с помощью диагностических утилит EVEREST или CPU-Z, но чтобы убедиться в положительном результате окончательно, следует провести всестороннее тестирование компьютера. Разблокировка выполняется на материнской плате и не изменяет физического состояния процессора. Вы можете в любой момент отказаться от разблокировки, отключив АСС, а при установке разблокированного процессора на другую плату он снова окажется заблокированным.
Заливка ячейки цветом в VBA Excel. Фон ячейки. Свойства.Interior.Color и.Interior.ColorIndex. Цветовая модель RGB. Стандартная палитра из 56 цветов. Предопределенные константы.
Начиная с Excel 2007 основным способом заливки диапазона или отдельной ячейки цветом (зарисовки, добавления, изменения фона) является использование свойства.Interior.Color объекта Range путем присваивания ему значения цвета в виде десятичного числа от 0 до 16777215 (всего 16777216 цветов).
Пример кода 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 есть предопределенные константы часто используемых цветов для заливки ячеек:
Присваивается цвет ячейке предопределенной константой в VBA Excel точно так же, как и числовым значением:
Пример кода 3:
Range("A1").Interior.Color = vbGreen
Цветовая система RGB представляет собой комбинацию различных по интенсивности основных трех цветов: красного, зеленого и синего. Они могут принимать значения от 0 до 255. Если все значения равны 0 - это черный цвет, если все значения равны 255 - это белый цвет.
Выбрать цвет и узнать его значения RGB можно с помощью палитры Excel:
Чтобы можно было присвоить ячейке или диапазону цвет с помощью значений RGB, их необходимо перевести в десятичное число, обозначающее цвет. Для этого существует функция VBA Excel, которая так и называется - RGB.
Пример кода 4:
Range("A1").Interior.Color = RGB(100, 150, 200)
До появления 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 цветов можете посмотреть .
Для того, чтобы в определённом рабочем листе, заменить все диаграммы на их скриншоты(рисунки), можно воспользоваться нижеопубликованным макросом:
Для того, чтобы в определённом рабочем листе, найти все круговые и разрезанные круговые диаграммы и сохранить все их составляющие в виде графических файлов, можно воспользоваться нижеопубликованным макросом. A после того, как временная рабочая книга, будет сохранена в виде HTML файла, Вы сможете увидеть все графические файлы в папке "C:\Temp_files"
Private Sub SavePieChartToPictures() Dim iList1 As Worksheet, iList2 As Worksheet Dim iCharts As ChartObjects, iChart As Chart Dim iGroup As Picture, iOffset&, iCount% Const iFileName = "C:\Temp.html" "укажите временный файл Application.ScreenUpdating = False Application.DisplayAlerts = False Set iList1 = Workbooks.Add(xlWBATWorksheet).Worksheets(1) Set iList2 = ThisWorkbook.Worksheets(1) "укажите нужный рабочий лист Set iCharts = iList2.ChartObjects For iCount = 1 To iCharts.Count Set iChart = iCharts(iCount).Chart Select Case iChart.ChartType Case xlPie, xlPieExploded iChart.CopyPicture Size:=xlScreen Set iGroup = iList1.Pictures.Paste ShapeList iGroup.ShapeRange.Ungroup, iOffset End Select Next With iList1.Parent .SaveAs FileName:=iFileName, FileFormat:=xlHtml .FollowHyperlink Address:=Replace(iFileName, ".html", ".files") .Close saveChanges:=False End With Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub Private Sub ShapeList(iGroup As ShapeRange, iOffset&) Dim iShape As Shape For Each iShape In iGroup If iShape.Type = msoGroup Then ShapeList iShape.Ungroup, iOffset Else iShape.Top = iOffset iOffset = iOffset + iShape.Height + 10 End If Next End Sub Комментарий: Если Вы являетесь обладателем Microsoft Excel 2007 и при программной попытке разгруппировать рисунок, получаете ошибку 1004 , то это означает, что Вам необходимо установить соответствующий Service Pack.Для того, чтобы раскрасить все точки определённой диаграммы случайными цветами можно использовать нижеопубликованный макрос, только не забудьте указать нужную диаграмму (в первом макросе предполагается, что диаграмма расположена в отдельном листе Диаграммы, а во втором, что диаграмма находится на рабочем листе с кодовым именем Лист1) :
Если Вам необходимо автоматически менять цвет заливки точки, в зависимости от данных исходной ячейки, например, после ввода числа > 1000 окрасить точку в зелёный цвет, а после ввода числа необходимо разместить в модуле рабочего листа (см. пример)
В этом примере используется диаграмма с одним рядом, построенная на основании данных диапазона . Если диаграмма должна находиться в отдельном листе Диаграммы, или в другом рабочем листе, то в таком случае - Вам придётся заменить ключевое слово Me ссылкой на нужный лист. Кроме того, в данном примере допускается применение функции RGB, вместо используемых констант, например, RGB(50, 0, 100)Если необходимо, чтобы сразу после изменения цвета заливки ячейки, цвет точки автоматически стал идентичным, то разместите весь нижеопубликованный код в модуле того рабочего листа, где находится диаграмма. И не забудьте указать свой индекс(номер) или имя диаграммы.
Примечание: Разумеется, в обоих примерах, синхронизация цвета будет происходить, только после выполнения события рабочего листа Worksheet_Activate . Если же активация листа Вас, по каким-то причинам, не устраивает, то вместо него можно использовать событие рабочей книги Worksheet_Open (вкупе с соответствующими изменениями)Комментарий: Если имя листа - источника данных, содержит запятую и/или диаграмма построена на основании данных несмежных ячеек, то вышеопубликованный парсинг формулы не позволит получить адрес ячеек.
Не секрет, что после создания диаграммы можно разорвать связь этой диаграммы с исходными ячейками, для этого достаточно последовательно выделять каждый ряд и нажимать клавиши F2, F9 и ENTER. Если тоже самое необходимо проделать, но уже с помощью VBA, то в случае, если диаграмма расположена на рабочем листе с кодовым именем Лист1 , можно использовать следующий макрос:
Примечание: Допускается замена кодового(программного) имени рабочего листа и листа диаграммы, так, к примеру, вместо Лист1 можно использовать Worksheets(Индекс_листа), Worksheets("Имя_листа") , а вместо Диаграмма1 возможно применение Charts(Индекс_листа) или Charts("Имя_листа") , Sheets("Имя_листа")Комментарий:
К сожалению, программный способ замены
приведёт к возникновению ошибки, если в результате замены, формула
=РЯД() теоретически будет содержать более 481 символов (не
считая длины имени ряда)
А вот замена вручную
, при этом же
количестве символов, возможна
, правда если их количество всё
же превысит стандартное ограничение формулы в 1024 символов, то Вы
получите сообщение типа, Слишком сложная формула.
Вариант II. (Microsoft Excel 2000 или старше)
Комментарий: Второй способ также приведёт к возникновению ошибки, если формула = iFormula$ будет содержать более 255 символов.Microsoft Excel 2007
В этой версии, разработчики
несколько увеличили лимит на количество символов в формуле (второй
вариант). Однако, высчитывать их количество, сейчас нет особого смысла,
т.к. есть альтернатива - первый вариант, где разработчики, возможно,
"сняли" ограничение. Во всяком случае, мне удалось заменить ссылку на
диапазон, где количество символов превышало 10000 шт.
Если в уже существующей диаграмме Вам необходимо изменить цвет заливки у точки с минимальным и максимальным значением, то в случае, когда диаграмма расположена на рабочем листе с кодовым именем Лист1 , и каждый ряд(серия) содержит только один минимум и максимум, Вы можете использовать следующий макрос:
Комментарий: Важно, чтобы выбранный цвет заливки (в данных примерах это красный и зелёный) не совпадал с изначальной заливкой точек, в противном случае, Вы получите диаграмму, где нужным цветом будут выделены не только точки с минимумом/максимумом. Впрочем, подобного совпадения цветов можно избежать, если предварительно установить цвет заливки у всех точек ряда, отличный от красного и зелёного, или же проверять цвет каждой точки и в случае совпадения, менять его. Кроме того, возможен вариант, при котором минимальное значение либо вообще не будет отображаться (к примеру, нулевое значение), либо визуально точка будет практически незаметна.Если в уже существующей диаграмме Вам необходимо найти, например, пять точек с максимальными значениями и добавить им подпись и/или изменить цвет текста подписи, то в случае, когда диаграмма расположена на рабочем листе с кодовым именем Лист1 , Вы можете использовать следующий макрос:
Комментарий: Если предполагается установить единый цвет текста для всех максимальных точек, то лучше не менять цвет шрифта в цикле, а установить его сразу для всей серии (см.пример)Если в уже существующей диаграмме Вам необходимо найти все точки, значения которых больше указанного в программе, и изменить их "яркость" (цвет заливки) , то Вы можете использовать следующий макрос. Только не забудьте, заменить температуру 36,6 на своё значение, превышение которого и должно выделять точку необходимым оттенком красного цвета.
Вариант I.
Если Вам необходимо программно добавить существующую нестандартную диаграмму - в список пользовательских типов диаграмм, то для этого можно использовать нижеопубликованный вариант, где третий именованный аргумент Description является необязательным, т.е. если краткое описание графика, для Вас, не представляет интереса, то этот аргумент можно оставить в покое. Обратите внимание на то, что первые два примера предназначены для диаграммы, которая размещена в отдельном листе, а следующие, для диаграммы, которая находится на рабочем листе.
Если Вам необходимо определить над какой из точек находится курсор мышки, причём не прибегая к выделению этой точки, то в таком случае можно использовать следующее событие диаграммы. Обратите внимание на то, что вывод информации в статус баре не носит обязательного характера и применяется только в качестве примера.
Примечание: В данном примере предполагается, что диаграмма расположена в отдельном листе , а весь вышеприведённый код находится в модуле этой диаграммы .Если же речь идёт о диаграмме, которая находится в рабочем листе, то
здесь также возможно применение события Chart_MouseMove, но только в случае,
если диаграмма активна(выделена). В противном случае, указанное событие
выполняться не будет, однако, это ограничение можно обойти, если пойти на
маленькую хитрость, а именно:
создать ActiveX элемент управления Надпись
(Label) и используя
свойства созданного элемента управления:
- удалить текст, который отображается напротив поля Caption
- напротив поля BackStyle
выбрать 0 - fmBackStyleTransparent
- и главное, расположить и изменить его размеры, так, чтобы подогнать
надпись под месторасположение и размеры нужной диаграммы.
После чего, использовать аналогичное событие, но уже не диаграммы, а
созданного элемента управления, естественно, учитывая их особенности.
Готовый пример, где демонстрируется этот трюк, можно скачать
.
Если Вам необходимо привести все диаграммы в рабочем листе к одинаковому размеру, т.е. установить одну и туже высоту и ширину для всех диаграмм листа, причём осуществить это необходимо (или желательно) без цикла , то Вы можете воспользоваться нижеприведённым вариантом, разумеется, указав свою высоту(height) и ширину(width) и, при необходимости, заменив ActiveSheet на конкретный рабочий лист.
