Кажуть, що до 50 відсотків презентацій PowerPoint містять дані, які були скопійовані прямо з Excel. У це твердження не важко повірити. Часто аналізувати та створювати діаграми та представлення даних у Excel набагато простіше, ніж у PowerPoint. Після того, як ці діаграми та представлення даних були створені, чому б вам просто не перемістити їх у PowerPoint? Макрос у цьому розділі дає змогу динамічно створювати слайди PowerPoint, які містять дані із заданого вами діапазону.
Ви можете завантажити робочий приклад надсилання даних Excel до PowerPoint .
У цьому прикладі ви копіюєте діапазон з файлу Excel і вставляєте цей діапазон на слайд у щойно створеній презентації PowerPoint.
Майте на увазі, що оскільки цей код запускатиметься з Excel, вам потрібно встановити посилання на бібліотеку об’єктів Microsoft PowerPoint. Ви можете встановити посилання, відкривши редактор Visual Basic в Excel і вибравши Інструмент→ Посилання. Прокрутіть униз, доки не знайдете запис Microsoft PowerPoint xx Object Library, де xx — це ваша версія PowerPoint. Поставте прапорець у прапорці біля запису.
Sub CopyRangeToPresentation ()
'Крок 1: Оголошення змінних
Dim PP Як PowerPoint.Application
Dim PPPres як PowerPoint.Presentation
Dim PPSlide як PowerPoint.Slide
Заглушити заголовок слайда як рядок
«Крок 2. Відкрийте PowerPoint і створіть нову презентацію
Встановіть PP = New PowerPoint.Application
Установіть PPPres = PP.Presentations.Add
PP.Visible = Правда
'Крок 3. Додайте новий слайд як слайд 1 і налаштуйте на нього фокус
Встановити PPSlide = PPPres.Slides.Add(1, ppLayoutTitleOnly)
PPSlide.Select
«Крок 4: Скопіюйте діапазон у вигляді зображення
Sheets("Дані слайда").Діапазон("A1:J28").CopyPicture _
Зовнішній вигляд:=xlScreen, Формат:=xlPicture
«Крок 5: Вставте зображення та відрегулюйте його положення
PPSlide.Shapes.Paste.Select
PP.ActiveWindow.Selection.ShapeRange.Align msoAlignCenters, True
PP.ActiveWindow.Selection.ShapeRange.Align msoAlignMiddles, True
«Крок 6: Додайте заголовок до слайда
SlideTitle = "Мій перший слайд PowerPoint"
PPSlide.Shapes.Title.TextFrame.TextRange.Text = SlideTitle
'Крок 7: Очищення пам'яті
PP.Активувати
Встановіть PPSlide = Нічого
Встановити PPPres = Нічого
Встановіть PP = Нічого
Кінець під
На кроці 1 ви оголошуєте чотири змінні: PP – це змінна об’єкта, яка надає об’єкт PowerPoint Application, PPPres – це змінна об’єкта, яка відкриває об’єкт PowerPoint Presentation, PPSlide – це змінна об’єкта, яка відкриває об’єкт PowerPoint Slide, а SlideTitle – це рядок. змінна, яка використовується для передачі тексту для заголовка слайда.
Крок 2 відкриває PowerPoint з порожньою презентацією. Зауважте, що ви встановлюєте властивість Visible програми PowerPoint на True, щоб переконатися, що ви можете бачити дію під час виконання коду.
На кроці 3 ви додаєте новий слайд до презентації за допомогою методу Add об’єкта Slide. Зверніть увагу, що ви використовуєте ppLayoutTitleOnly, переконавшись, що слайд створено з текстовим кадром заголовка. Потім ви робите додатковий крок і встановлюєте фокус на слайді. Тобто ви явно вказуєте PowerPoint вибрати цей слайд, роблячи його активним.
На кроці 4 ви використовуєте метод CopyPicture для копіювання цільового діапазону як зображення. Сюди копіюється діапазон від A1 до J28 на вкладці «Дані слайда».
Крок 5 вставляє зображення в активний слайд і центрує зображення як по горизонталі, так і по вертикалі.
На кроці 6 ви зберігаєте текст для заголовка в рядковій змінній, а потім передаєте цю змінну в PowerPoint, щоб застосувати текст до текстового фрейма заголовка.
На кроці 7 ви звільняєте об’єкти, призначені вашим змінним, зменшуючи ймовірність будь-яких проблем, викликаних рум’яними об’єктами, які можуть залишатися відкритими в пам’яті.
Щоб реалізувати цей макрос, ви можете скопіювати та вставити його в стандартний модуль:
Активуйте редактор Visual Basic, натиснувши Alt+F11.
У вікні Проект знайдіть назву проекту/книги.
Виберіть «Вставка»→ «Модуль».
Введіть або вставте код.
Як заборонити Microsoft Word відкривати файли в режимі лише для читання в Windows. Microsoft Word відкриває файли в режимі лише для читання, що робить неможливим їх редагування? Не хвилюйтеся, методи наведено нижче
Як виправити помилки під час друку неправильних документів Microsoft Word Помилки під час друку документів Word зі зміненими шрифтами, безладними абзацами, відсутнім текстом або втраченим вмістом є досить поширеними. Однак не варто
Якщо ви використовували перо або маркер для малювання на слайдах PowerPoint під час презентації, ви можете зберегти малюнки для наступної презентації або стерти їх, щоб наступного разу, коли ви показуватимете їх, розпочали з чистих слайдів PowerPoint. Дотримуйтесь цих інструкцій, щоб стерти малюнки пером і маркером: Стирання рядків на одній з […]
Бібліотека стилів містить файли CSS, файли мови розширюваної мови таблиць стилів (XSL) та зображення, які використовуються попередньо визначеними основними сторінками, макетами сторінок та елементами керування в SharePoint 2010. Щоб знайти файли CSS у бібліотеці стилів сайту видавництва: виберіть «Дії сайту»→ «Перегляд». Весь вміст сайту. З’являється вміст сайту. Бібліотека Style знаходиться в […]
Не перевантажуйте аудиторію гігантськими цифрами. У Microsoft Excel ви можете покращити читабельність своїх інформаційних панелей і звітів, відформатувавши числа, щоб вони відображалися в тисячах або мільйонах.
Дізнайтеся, як використовувати інструменти соціальних мереж SharePoint, які дозволяють особам і групам спілкуватися, співпрацювати, обмінюватися інформацією та спілкуватися.
Юліанські дати часто використовуються у виробничих середовищах як мітка часу та швидкий довідник для номера партії. Цей тип кодування дати дозволяє роздрібним продавцям, споживачам та агентам з обслуговування визначити, коли був виготовлений продукт, а отже, і вік продукту. Юліанські дати також використовуються в програмуванні, військовій справі та астрономії. Інший […]
Ви можете створити веб-програму в Access 2016. Так що ж таке веб-програма? Ну, веб означає, що він онлайн, а додаток — це просто скорочення від «додаток». Користувацька веб-програма — це онлайн-додаток для баз даних, доступ до якого здійснюється з хмари за допомогою браузера. Ви створюєте та підтримуєте веб-програму у настільній версії […]
Більшість сторінок у SharePoint 2010 відображають список посилань навігації на панелі швидкого запуску ліворуч. Панель швидкого запуску відображає посилання на пропонований вміст сайту, наприклад списки, бібліотеки, сайти та сторінки публікації. Панель швидкого запуску містить два дуже важливі посилання: Посилання на весь вміст сайту: […]
Для простих задач Solver в Excel зазвичай швидко знаходить оптимальні значення змінної Solver для цільової функції. Але в деяких випадках Solver має проблеми з пошуком значень змінної Solver, які оптимізують цільову функцію. У цих випадках Solver зазвичай відображає повідомлення або повідомлення про помилку, що описує або обговорює проблему, яка […]
