Форум программистов
 
О проблемах с регистрацией пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail, а тут можно восстановить пароль.

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail


Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы
Старый 16.10.2008, 06:42   #1
gusluk
Форумчанин
 
Аватар для gusluk
 
Регистрация: 16.10.2008
Сообщений: 203
По умолчанию Диаграммы в excel

На отдельном листе расположены шесть диаграмм, как можно подогнать их размеры под один стандарт, не вручную прикладывая к монитору линейку, а автоматически?
gusluk вне форума
Старый 16.10.2008, 08:05   #2
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,166
По умолчанию

Для каждой диаграммы определяем размер и адрес ячейки верхнего левого угла диаграммы. Зная эти параметры, используем методы ScaleHeight, ScaleWidth, IncrementLeft, IncrementTop. Т.е. масштабируем и перемещаем как нам нужно.

P.S. Если не понятно - приложите файл с исходными диаграммами и с тем, как должно получиться.
Чем шире угол зрения, тем он тупее.

Последний раз редактировалось SAS888; 16.10.2008 в 08:09. Причина: Добавлено
SAS888 вне форума
Старый 01.11.2008, 07:26   #3
gusluk
Форумчанин
 
Аватар для gusluk
 
Регистрация: 16.10.2008
Сообщений: 203
По умолчанию

В файле находится пример диаграммы. Так как сделать чтобы на листе Диаграмма2 все было расположено примерно так же, как на листе диаграмма1. Без прикладывания линейки к монитору?
Вложения
Тип файла: rar prof_demo.rar (206.1 Кб, 17 просмотров)
gusluk вне форума
Старый 01.11.2008, 09:49   #4
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,166
По умолчанию

Посмотрите вложение. Запустите макрос "Normalization"
Вложения
Тип файла: rar prof_demo_2.rar (210.0 Кб, 33 просмотров)
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 05.11.2008, 06:28   #5
gusluk
Форумчанин
 
Аватар для gusluk
 
Регистрация: 16.10.2008
Сообщений: 203
По умолчанию

Мое вам большое спасибо!
gusluk вне форума
Старый 05.11.2008, 07:15   #6
gusluk
Форумчанин
 
Аватар для gusluk
 
Регистрация: 16.10.2008
Сообщений: 203
По умолчанию

И еще вопросик, какие параметры определяют высоту и длину вертикальной и горизонтальной шкал?
gusluk вне форума
Старый 05.11.2008, 07:50   #7
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,166
По умолчанию

Вообще, эти параметры оговорены данными.
Так, например, строка кода
Код:
ActiveChart.SetSourceData Source:=Sheets("Лист1").Range("A1:A30"), PlotBy:=xlColumns
определяет диапазон с данными "A1:A30", и, соответственно, количество категорий (шкалу по оси "X") - 30.
Для оси "Y" можно устанавливать, например:
Код:
With ActiveChart.Axes(xlCategory)
        .CrossesAt = 1  ' Номер категории (порядковый номер по оси "X") в которой пересечение с осью "Y".
        .TickLabelSpacing = 1 'Количество категорий между подписями
        .TickMarkSpacing = 1 'Число категорий между делениями
        .ReversePlotOrder = False 'Обратный порядок по оси "X".
    End With
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 05.11.2008, 08:01   #8
gusluk
Форумчанин
 
Аватар для gusluk
 
Регистрация: 16.10.2008
Сообщений: 203
По умолчанию

Еще раз спасибо, полезная информация, ноя имел в виду несколько другое.
У диаграммы есть параметры "Область диаграммы" и "Область построения диаграммы". Область диаграммы это как раз то что меняем при помощи
ChartObjects(i).Height и ChartObjects(i).Width и теперь я хочу изменить параметры области построения диаграммы.
gusluk вне форума
Старый 05.11.2008, 08:25   #9
SAS888
Старожил
 
Аватар для SAS888
 
Регистрация: 05.12.2007
Сообщений: 4,166
По умолчанию

Для изменения размеров области построения свойства Height и Width применяйте к ActiveChart.PlotArea.
Чем шире угол зрения, тем он тупее.
SAS888 вне форума
Старый 05.11.2008, 09:11   #10
gusluk
Форумчанин
 
Аватар для gusluk
 
Регистрация: 16.10.2008
Сообщений: 203
По умолчанию

Сделал! Отлично получилось, спасибо еще раз.
gusluk вне форума
Закрытая тема
Купить рекламу на форуме 20000 рублей в месяц

Опции темы


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Составление диаграммы Иля Microsoft Office Excel 1 06.04.2008 17:08
Диаграммы vvovik Компоненты Delphi 1 15.02.2008 19:12
Построение диаграммы на С Raptor Помощь студентам 2 04.12.2007 10:15
Построение диаграммы Владислав Крюков Microsoft Office Excel 12 14.11.2007 23:50


Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru
Пеллетный котёл Emtas
котлы EMTAS