IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Powerpoint Discussion :

Executer une macro toutes les minutes


Sujet :

Powerpoint

  1. #1
    Membre habitué
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    mars 2021
    Messages
    86
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 26
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : mars 2021
    Messages : 86
    Points : 146
    Points
    146
    Par défaut Executer une macro toutes les minutes
    Bonjour, je sais que la fonction application.onetime n'existe pas dans powerpoint, mais en activant les références et en initialisant les application excel n'est-ce pas possible ?

    Comme ceci par exemple

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Sub maj()
    Dim ppt As PowerPoint.Application
    Dim Pres As PowerPoint.Presentation
    Set ppt = CreateObject("PowerPoint.Application")
    Set Pres = ppt.ActivePresentation
    Dim xlapp As excel.Application
    Pres.UpdateLinks
    xlapp.OnTime Now + TimeValue("00:01:00"), "maj"
    End Sub
    J'ai activé la bibliothèque de références excel 2016 mais ça bloque quand même sur la déclaration de xlapp.

    Si vous avez une solution

    Merci

  2. #2
    Membre habitué
    Homme Profil pro
    Ingénieur qualité méthodes
    Inscrit en
    mars 2021
    Messages
    86
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 26
    Localisation : France, Rhône (Rhône Alpes)

    Informations professionnelles :
    Activité : Ingénieur qualité méthodes
    Secteur : Industrie

    Informations forums :
    Inscription : mars 2021
    Messages : 86
    Points : 146
    Points
    146
    Par défaut résolu
    Bon j'ai trouvé une méthode encore mieux, comme mon PTT est lié a des graph sur un classeur excel, je fais une mise a jour des links du PTT des qu'il y a un changement sur une des feuilles de mon excel. Comme ceci :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    Dim ppt As PowerPoint.Application
    Dim Pres As PowerPoint.Presentation
    Dim chemPTT As String
    chemPTT = "C:\Users\bboschi\Desktop\modele tier2 V1.0.pttm"
    Set ppt = CreateObject("PowerPoint.Application")
    Set Pres = ppt.Presentations(chemPTT)
    Pres.UpdateLinks
    End Sub
    Je précise que le code est dans le classeur excel du coup

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Executer une action toute les x secondes.
    Par nuFox dans le forum C
    Réponses: 18
    Dernier message: 06/03/2008, 15h18
  2. [WD10]Executer une tache toute les x min, sec, etc.
    Par tunidesign dans le forum WinDev
    Réponses: 2
    Dernier message: 11/02/2008, 03h31
  3. [Ruby] Executer une methode toutes les x secondes
    Par skystef dans le forum GTK+
    Réponses: 4
    Dernier message: 29/11/2007, 20h49
  4. Executer une fonction tout les X minutes
    Par Fabouney dans le forum C
    Réponses: 6
    Dernier message: 07/08/2006, 19h33
  5. lancer une procedure toutes les minutes precisemment
    Par Alextk dans le forum SQL Procédural
    Réponses: 1
    Dernier message: 06/06/2006, 15h10

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo