Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

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

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

Купить рекламу на форуме - 42 тыс руб за месяц

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

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

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

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

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

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

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

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

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

Вообще, эти параметры оговорены данными.
Так, например, строка кода
Код:
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
Сообщений: 205
По умолчанию

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

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

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


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Составление диаграммы Иля Microsoft Office Excel 1 06.04.2008 18: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