ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Помогите девушке!!!
24 сообщений из 24, страница 1 из 1
Помогите девушке!!!
    #34066284
VaVaVa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VaVaVa
Участник
Нужно создать макрос, растягивающий уже созданную в Сhart диограмму по оси Х в созданной Sheet5.
Простой записью не получается. Помогите с кодом макроса.
...
Рейтинг: 0 / 0
19.10.2006, 12:56:30
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066341
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
orunbek
Участник
Примерно так:
Код: plaintext
1.
2.
    ActiveSheet.Shapes("Chart. 1").ScaleWidth  1 . 07 , msoFalse, msoScaleFromTopLeft
    ActiveSheet.Shapes("Chart. 1").ScaleHeight  1 . 16 , msoFalse, msoScaleFromTopLeft
или смотрите приложенный файл
...
Рейтинг: 0 / 0
19.10.2006, 13:07:52
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066366
VaVaVa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VaVaVa
Участник
Не работает пишет такую ошибку (в файле). Сейчас заплачу.
...
Рейтинг: 0 / 0
19.10.2006, 13:12:59
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066399
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Ничонепонял.
Может выложить файл?


Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 13:18:59
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066417
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
У меня твой код работает

Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 13:21:53
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066424
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Private Sub CommandButton1_Click()
ActiveSheet.Shapes("Диагр. 1").ScaleWidth 1.07, msoFalse, msoScaleFromTopLeft
ActiveSheet.Shapes("Диагр. 1").ScaleHeight 1#, msoFalse, msoScaleFromTopLeft
End Sub

Только по Х растягивает !



Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 13:23:52
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066432
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Приче при каждом нажатии растягивает по Х на 7 процентов

Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 13:25:27
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066442
VaVaVa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VaVaVa
Участник
Вот, всеравно не работает...
...
Рейтинг: 0 / 0
19.10.2006, 13:27:37
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066452
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Видимо какая то библиотека не подключена



Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 13:29:37
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066466
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Попробуй так: влючи макрорекордер на запись и растяни вручную диаграмму. Посмотри полученный код. Подправь и сунь под кнопку.



Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 13:31:23
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066474
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
У меня получилось так:
ActiveSheet.ChartObjects("Диагр. 1").Activate
ActiveChart.ChartArea.Select
Windows("Temp[1]").SmallScroll ToRight:=1
ActiveSheet.Shapes("Диагр. 1").ScaleWidth 0.77, msoFalse, msoScaleFromTopLeft
ActiveWindow.Visible = False
Windows("Temp[1]").Activate
Range("K4").Select



Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 13:32:48
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066478
VaVaVa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VaVaVa
Участник
Что подправить....
...
Рейтинг: 0 / 0
19.10.2006, 13:33:18
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066489
VaVaVa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VaVaVa
Участник
Кто-нибудь пришлите подправленный файл, я ничгошенки не понимаю!!!!!
...
Рейтинг: 0 / 0
19.10.2006, 13:35:20
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066497
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Подправить коэф. увеличения по ширине ScaleWidth 0.77
уменшит. ( 77 проц. от начального)

Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 13:36:06
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066541
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
На сколько проц. нужно растягивать при нажатии на кнопку?



Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 13:42:14
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066595
VaVaVa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VaVaVa
Участник
Talgat, а ты не мог бы мне прислать исправленный файл каторый я выкладывала. Прости за наивность, я далека от програмирования.
...
Рейтинг: 0 / 0
19.10.2006, 13:53:42
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066605
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Могу. На сколько процентов должна растягиватся диаграмма по высоте и ширине при нажатии на кнопку?

Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 13:55:25
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066653
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
orunbek
Участник
VaVaVaНе работает пишет такую ошибку (в файле). Сейчас заплачу.
Ну вы хоть понимаете это сообщение?
В ней говорится что элемент с таким именем не найден, скорее всего ругается на
ActiveSheet.Shapes("Chart. 1").ScaleWidth 1.07, msoFalse, msoScaleFromTopLeft
...
Рейтинг: 0 / 0
19.10.2006, 14:03:42
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066676
VaVaVa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VaVaVa
Участник
Миленький Talgat, только по ширене, и до конца ячеек.
...
Рейтинг: 0 / 0
19.10.2006, 14:08:30
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066702
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
VaVaVaМиленький Talgat, только по ширене, и до конца ячеек.
На ширину экрана что ли?
...
Рейтинг: 0 / 0
19.10.2006, 14:14:34
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066737
VaVaVa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VaVaVa
Участник
Смешно, файл "раст. диаграммы.xls" у меня не работает. И при нажатии кнопки выдает приведенную ранее ошибку. Наверное у меня что-то с компьютером.
...
Рейтинг: 0 / 0
19.10.2006, 14:22:15
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066755
Фотография talgat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
talgat
Участник
Скорее МС Офис более старой версии


Рыба ищет-где глубже, человек-где больше рыбы.
...
Рейтинг: 0 / 0
19.10.2006, 14:25:15
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34066777
VaVaVa
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
VaVaVa
Участник
Спасибо всем, а особенно Talgad. Всем пока.
...
Рейтинг: 0 / 0
19.10.2006, 14:29:48
| Ответить | Цитировать | Написать  
Помогите девушке!!!
    #34068178
treiber
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
treiber
Участник
VaVaVaСмешно, файл "раст. диаграммы.xls" у меня не работает. И при нажатии кнопки выдает приведенную ранее ошибку. Наверное у меня что-то с компьютером. Не может ли причиной не работоспособности макроса-растяжки йвляться то,чцто подключается не vba, а vb?
...
Рейтинг: 0 / 0
19.10.2006, 23:26:05
| Ответить | Цитировать | Написать  
24 сообщений из 24, страница 1 из 1
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Помогите девушке!!!
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=61&gotonew=1&tid=2184107]:
 0ms
get settings:
 6ms
get forum list:
 11ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 40ms
get topic data:
 7ms
get first new msg:
 4ms
get forum data:
 2ms
get page messages:
 36ms
get tp. blocked users:
 1ms
others: 207ms
total:  318ms
созд. / загр.: 318ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]