macro excel per aprire un file powerpoint, aggiornare i collegamenti, chiuderlo e salvarlo in pdf

Anonimo
2022-09-08T14:50:14+00:00

Buonasera, sto cercando di creare una macro in excel che mi permetta le seguenti operazioni:

  • aprire un file in power point
  • aggiornare in automatico i collegamenti senza messaggio di richiesta
  • salvare il file powerpoint in formato PDF
  • chiudere il powerpoint
  • aprire il PDF creato

Il tutto se possibile senza che l'utente veda aprirsi il powerpoint

grazie

Microsoft 365 e Office | Excel | Per la casa | Windows

Domanda bloccata. Questa domanda è stata eseguita dalla community del supporto tecnico Microsoft. È possibile votare se è utile, ma non è possibile aggiungere commenti o risposte o seguire la domanda.

0 commenti Nessun commento

Risposta accettata dall'autore della domanda

Eleuterio Tedeschi 18,590 Punti di reputazione Moderatore volontario
2022-09-14T14:26:18+00:00

Hai provato l'ultimo codice che ti ho inviato?

Sono convinto faccia già quanto necessario😉

Comunque mi è piaciuto:

ActiveWorkbook.FollowHyperlink strPDF_File_Name

👍🏻

mentre questo secondo me è superfluo:

Application.ScreenUpdating = False

Inoltre usando una stringa per il percorso (strPath) ed una per il nome del file (strFileName), usale per comporre sempre il nome completo, io ti ho predisposto una terza variabile con l'estensione:

.SaveAs strPath & strFileName & strExt

.SaveAs strPath & strFileName & ".pdf"

strPDF_File_Name = strPath & strFileName & ".pdf"

in questa maniera non avrai errori se ti sfuggisse di modificarle in seguito, lo fai solo in un posto.

Ciao.

La risposta è stata utile?

1 persona ha trovato utile questa risposta.
0 commenti Nessun commento

Risposta accettata dall'autore della domanda

Eleuterio Tedeschi 18,590 Punti di reputazione Moderatore volontario
2022-09-13T20:46:39+00:00

Mi apre il power point ma con il nome Presentazione1 , infatti mi da errore al .save

Ho sostituito .save con saveas e mi salva tutto correttamente

Non avendo i file a disposizione è difficile darti un codice finito, stai apportando gli adattamenti necessari 👍

Adesso prima di chiuderlo vorrei salvarlo e visualizzarlo anche come PDF

Aggiungi dopo il SaveAs

.SaveAs "\Mia cartella\Collaboratoi" & ".pdf", 32

dovrebbe salvare in pdf e, se hai il flag come indicato, lo dovrebbe aprire.

Puoi anche forzare la mano dichiarando all'inizio un nuovo oggetto:

Dim objShell As Object

e dopo l'ultimo End With aggiungere

Set objShell = CreateObject("WScript.Shell")

objShell .Run "\Mia cartella\Collaboratoi.pdf"

che era ciò che in principio stavi facendo tu quando tentavi di aprire PP.

un'altra cosa il . close mi chiude la presentazione ma rimane aperto il power point, vorrei chiudere anche l'applicazione

Prova a mettere tra i due End With un

.Quit

dovrebbe chiudere l'applicazione.

Ciao.

La risposta è stata utile?

1 persona ha trovato utile questa risposta.
0 commenti Nessun commento

12 risposte aggiuntive

Ordina per: Più utili
  1. Anonimo
    2022-09-09T15:17:18+00:00

    Parte tutto da excel perchè è dove ho tutte le mie pivot/grafici che utilizzo per le analisi delle performance dei vari collaboratori.

    Nella mia idea su excel l'utente con un filtro seleziona il collaboratore che vuole analizzare modificando tutte le varie tabelle/grafici collegate e con una macro apre il pdf riassuntivo del singolo collaboratore selezionato

    Utilizzo il PP come appoggio in quanto trasformando i vari fogli excel in pdf la qualità estetica ne risente, invece collegando le informazioni presenti su excel al power point riesco ad ottenere una qualità estetica migliore

    Al momento ho collegato i grafici e le pivot che mi servono al power point ( ho incollato le informazioni come oggetti di Excel) poi sono riuscito con questo codice a far aprire il power point  

    Sub power_point()

    Dim m_ret

    Dim sCmd As String

    sCmd = Chr(34) & "C:\Program Files (x86)\Microsoft Office\root\Office16\POWERPNT.EXE" & Chr(34)

    sCmd = sCmd & " " & Chr(34) & "Mia cartella\Collaboratoi.pptm" & Chr(34)m_ret = Shell(sCmd, 1)

    End Sub

    All’apertura mi esce un messaggio che mi chiede se voglio aggiornare i collegamenti dando ok si apre tranquillamente (vorrei se possibile farlo fare in automatico e non dall'utente)

    A questo punto vorrei far salvare questo file .pptm come .PDF nella stessa cartella , visualizzare il .PDF e chiudere il .pptm di appoggio

    Spero di aver chiarito meglio la mia esigenza

    Grazie mille per il supporto

    La risposta è stata utile?

    0 commenti Nessun commento
  2. Eleuterio Tedeschi 18,590 Punti di reputazione Moderatore volontario
    2022-09-09T13:11:54+00:00

    Buonasera, sto cercando di creare una macro in excel che mi permetta le seguenti operazioni:

    • aprire un file in power point
    • aggiornare in automatico i collegamenti senza messaggio di richiesta
    • salvare il file powerpoint in formato PDF
    • chiudere il powerpoint
    • aprire il PDF creato

    Il tutto se possibile senza che l'utente veda aprirsi il powerpoint

    grazie

    Quello che chiedi è fattibile, ma ci sono troppi punti oscuri:

    1. perché da Excel se tutto risiede su PP;
    2. cosa deve aggiornare e come;
    3. come individuare su quale file lavorare;

    ergo, se non alleghi qualche file di esempio, una bozza di codice e gli elementi per poterti aiutare, diventa difficile dare seguito alla tua richiesta.

    Ciao.

    La risposta è stata utile?

    0 commenti Nessun commento
  3. Anonimo
    2022-09-09T03:39:23+00:00

    La risposta è stata tradotta automaticamente. Di conseguenza, potrebbero esserci errori grammaticali o parole insolite.

    Ciao Perino Simone

    Grazie per aver utilizzato i prodotti Microsoft e per averli pubblicati nella community.

    Secondo Microsoft 365 e Office / Per uso privato / categoria che hai pubblicato, abbiamo già saputo che il tuo problema è "Devi creare uno specifico apri un file PowerPoint, aggiornare i collegamenti, chiuderlo e salvarlo in pdf". Non esitate a correggermi se la mia comprensione è sbagliata.

    La nostra community fornisce supporto tecnico per l'uso quotidiano e gli errori di aggiornamento di Office Home Edition e Professional Edition. Per quanto riguarda il problema che hai menzionato, perché coinvolge il codice VBA Marco, questo non rientra nell'ambito del nostro supporto tecnico della comunità.

    Il posto migliore per ottenere aiuto per VBA in Excel è Microsoft Docs, che ha lo scopo di supportare utenti più avanzati come te. Ecco un linkad alcuni esempi di codice generali dal centro per sviluppatori Excel che possono essere utili, gli sviluppatori di solito comunicano in inglese, l'utilizzo di strumenti di traduzione è una buona scelta

    Ed ecco un **** linkal forum in cui è possibile sollevare scenari specifici e condividere il codice VBA per aiutare a risolvere il problema. Non sarò in grado di aiutarmi ulteriormente, ma lascerò aperta questa domanda nel caso in cui qualcuno dei nostri fantastici volontari abbia qualche intuizione per te.

    Migliori saluti

    Chandy| Microsoft Community Support Specialist


    * Fai attenzione ai truffatori che pubblicano numeri di supporto falsi qui.

    La risposta è stata utile?

    0 commenti Nessun commento