Modifica di PowerPoint incorporato da VBA di Excel

Question

Ho una presentazione di PowerPoint incorporata in una cartella di lavoro di Excel. Come posso modificarlo (apri, copia le diapositive, aggiungi dati alle diapositive, chiudi) usando VBA?

Answer 1

1. Aggiungi un riferimento al modello a oggetti di PowerPoint all'applicazione VBA

Dalla finestra VBA, scegli Strumenti | Riferimenti
Cerca Libreria oggetti di Microsoft Powerpoint 12.0 e selezionalo

2. Seleziona e attiva l'oggetto presentazione PowerPoint

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

Nota: questo codice presuppone che l'oggetto PowerPoint sia denominato Oggetto 1 (guarda nell'angolo in alto a sinistra per vedere come è realmente chiamato) e che si trova sul foglio attivo.

3. Ottieni un riferimento all'oggetto Presentazione

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

4. Manipolarlo

Tutti i metodi e le proprietà di un oggetto presentazione sono disponibili per te. Ecco un esempio di aggiunta di una diapositiva:

p.Slides.Add 1, ppLayoutBlank

5. Deselezionalo

Il modo più semplice è solo selezionare una cella.

[a1].Select

Spero che ti aiuti!