Una famiglia di prodotti Microsoft di grafica per presentazioni che offre strumenti per la creazione di presentazioni e l'aggiunta di effetti grafici, come oggetti multimediali ed effetti speciali con testo.
Ecco cosa devo fare:
- seleziona la slide 8
- seleziona e cancella l'immagine già presente nella slide 8 (devo aggiornare mensilmente il file, quindi c'è già l'immagine del mese precedente)
- esegui "incolla speciale" selezionando l'opzione "immagine enhanced metafile"
- esegui "formato immagine", impostando le dimensioni immagine al 95%, la posizione orizzontale -0,1 cm e verticale 2,6 cm (i valori sono solo indicativi, vanno bene anche diversi)
Se poi si riuscisse a fare eseguire queste istruzioni da una macro in excel sarebbe il top (perchè l'immagine che devo incollare proviene da un file excel).
Dalla macro di excel riesco già ad aprire powerpoint e aprire il file "report.pptm", ma non vado oltre:
Dim m_ret
Dim sCmd As String
sCmd = Chr(34) & "C:\Program Files (x86)\Microsoft Office\Office14\powerpnt.exe" & Chr(34)
sCmd = sCmd & " " & Chr(34) & "D:\report.pptm" & Chr(34)
m_ret = Shell(sCmd, 1)
Grazie