Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/В Application.Caller передать имя группы объектов - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » В Application.Caller передать имя группы объектов (Макросы/Sub)
В Application.Caller передать имя группы объектов
Sancho Дата: Пятница, 13.10.2017, 15:22 | Сообщение № 1
Группа: Проверенные
Ранг: Обитатель
Сообщений: 282
Репутация: 19 ±
Замечаний: 0% ±

2007, 2010, 2013
Всем привет!
Как в Application.Caller передать имя группы объектов? Выполнение макроса назначил на группу объектов, однако в Application.Caller передается имя диаграммы, если клик был на диаграмме, либо имя текстбокса, если клик был на нем. Необходимо осуществить макросом копирование диаграмм сгруппированными с текстбоксами в буфер обмена. Диаграмм несколько, хотелось бы обойтись одним блоком не расписывая условия что дополнительно скопировать для каждой диаграммы, да и думаю при вставке с таким подходом все сдвинется в одну точку.
К сообщению приложен файл: Sancho1.xlsm (32.0 Kb)
 
Ответить
СообщениеВсем привет!
Как в Application.Caller передать имя группы объектов? Выполнение макроса назначил на группу объектов, однако в Application.Caller передается имя диаграммы, если клик был на диаграмме, либо имя текстбокса, если клик был на нем. Необходимо осуществить макросом копирование диаграмм сгруппированными с текстбоксами в буфер обмена. Диаграмм несколько, хотелось бы обойтись одним блоком не расписывая условия что дополнительно скопировать для каждой диаграммы, да и думаю при вставке с таким подходом все сдвинется в одну точку.
Автор - Sancho
Дата добавления - 13.10.2017 в 15:22
Pelena Дата: Пятница, 13.10.2017, 16:53 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 19603
Репутация: 4660 ±
Замечаний: ±

Excel 365 & Mac Excel
Здравствуйте.
А зачем группировать? Просто внедрите надпись в диаграмму. Для этого добавляйте надпись при активной диаграмме
К сообщению приложен файл: 9098218.xlsm (35.6 Kb)

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеЗдравствуйте.
А зачем группировать? Просто внедрите надпись в диаграмму. Для этого добавляйте надпись при активной диаграмме
Автор - Pelena
Дата добавления - 13.10.2017 в 16:53
Sancho Дата: Понедельник, 16.10.2017, 07:24 | Сообщение № 3
Группа: Проверенные
Ранг: Обитатель
Сообщений: 282
Репутация: 19 ±
Замечаний: 0% ±

2007, 2010, 2013
Pelena, Спасибо, только в таком случае если клик произойдет на надписи то задуманного не получится.
 
Ответить
СообщениеPelena, Спасибо, только в таком случае если клик произойдет на надписи то задуманного не получится.
Автор - Sancho
Дата добавления - 16.10.2017 в 07:24
Pelena Дата: Понедельник, 16.10.2017, 09:30 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 19603
Репутация: 4660 ±
Замечаний: ±

Excel 365 & Mac Excel
Попробуйте так
[vba]
Код
ActiveSheet.Shapes.Range(Array(Application.Caller)).ParentGroup.CopyPicture
[/vba]
К сообщению приложен файл: 5708771.xlsm (36.7 Kb)

"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеПопробуйте так
[vba]
Код
ActiveSheet.Shapes.Range(Array(Application.Caller)).ParentGroup.CopyPicture
[/vba]
Автор - Pelena
Дата добавления - 16.10.2017 в 09:30
Sancho Дата: Понедельник, 16.10.2017, 12:17 | Сообщение № 5
Группа: Проверенные
Ранг: Обитатель
Сообщений: 282
Репутация: 19 ±
Замечаний: 0% ±

2007, 2010, 2013
Pelena, Спасибо!
 
Ответить
СообщениеPelena, Спасибо!
Автор - Sancho
Дата добавления - 16.10.2017 в 12:17
Мир MS Excel » Вопросы и решения » Вопросы по VBA » В Application.Caller передать имя группы объектов (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2026 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!