Edición Incrustada de Excel VBA

Question

He incrustado presentación de PowerPoint en un libro de Excel.¿Cómo puedo editar este (abrir, copiar diapositivas, agregar datos a las diapositivas, cierre), el uso de VBA?

Answer 1

1.Agregue una referencia al Modelo de Objetos de PowerPoint para la aplicación de VBA

Desde la ventana de VBA, elegir Herramientas | Referencias
Buscar Microsoft Powerpoint 12.0 Biblioteca De Objetos De y verificación de

2.Seleccionar y activar el objeto de presentación de PowerPoint

ActiveSheet.Shapes("Object 1").Select
Selection.Verb Verb:=xlOpen

Nota:este código supone que el objeto de PowerPoint se denomina Objeto 1 (mira en la esquina superior izquierda para ver lo que es realmente el nombre) y que es en la hoja activa.

3.Obtener una referencia al objeto de Presentación de

Dim p As PowerPoint.Presentation
Set p = Selection.Object

4.Manipular

Todos los métodos y propiedades de un objeto de presentación están disponibles para usted.He aquí un ejemplo de cómo agregar una diapositiva:

p.Slides.Add 1, ppLayoutBlank

5.Anule la selección

La manera más fácil es simplemente seleccione una celda.

[a1].Select

Espero que ayude!