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

VBA PowerPoint Discussion :

Faire un "enregistrer sous 2003" en vba [PPT-2007]


Sujet :

VBA PowerPoint

  1. #1
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Septembre 2009
    Messages
    40
    Détails du profil
    Informations personnelles :
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations forums :
    Inscription : Septembre 2009
    Messages : 40
    Points : 33
    Points
    33
    Par défaut Faire un "enregistrer sous 2003" en vba
    Bonjour
    voici mon problème
    j'ai un document modèle powerpoint 2003 que je dois enregistrer sous le format 2003 et 2007
    ma macro est faite pour tourner sous 2007
    le problème c'est que je ne trouve pas comment, en vba, "enregistrer sous 2003" ou forcer l'enregistrement en 2007 (en .pptx) quand le document modèle est en .ppt
    j'ai testé SaveAs en précisant "nomdudoc.pptx" mais il m'enregistre sous "nomdudoc.pptx.ppt" ...
    et forcement avec powerpoint 2007 on ne peux plus enregistrer des macros donc je ne peux même pas essayer comme ça ...
    je sais pas si j'ai été très claire à vrai dire ... j'espère en tout cas
    merci d'avance pour votre aide

  2. #2
    Membre habitué
    Homme Profil pro
    Retraité
    Inscrit en
    Juin 2008
    Messages
    225
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Juin 2008
    Messages : 225
    Points : 155
    Points
    155
    Par défaut
    Bonjour stroumfette44,
    En insérant le code suivant dans la procédure, il affiche le dialogue "Enregistrer sous"; ce qui permet de choisir le format de sauvegarde.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
            Set dlgSaveAs = Application.FileDialog(Type:=msoFileDialogSaveAs)
            dlgSaveAs.Show
    Harry

  3. #3
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Septembre 2009
    Messages
    40
    Détails du profil
    Informations personnelles :
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations forums :
    Inscription : Septembre 2009
    Messages : 40
    Points : 33
    Points
    33
    Par défaut
    le soucis c'est qu'il y a plus d'une centaine de document à sortir comme ça ...
    je ne vais pas pouvoir les enregistrer tous un par un ...
    mais merci pour la solution, je prends note

  4. #4
    Membre habitué
    Homme Profil pro
    Retraité
    Inscrit en
    Juin 2008
    Messages
    225
    Détails du profil
    Informations personnelles :
    Sexe : Homme

    Informations professionnelles :
    Activité : Retraité

    Informations forums :
    Inscription : Juin 2008
    Messages : 225
    Points : 155
    Points
    155
    Par défaut
    Une autre piste peut-être, le post de de Philippe Jochmans:
    http://powerpoint.developpez.com/faq...egistreurMacro
    En complément: ALT+O M R pour terminer l'enregistrement.
    Peut-être que le code généré servira d'inspiration.
    Je ne peux pas tester, cette fonction n'étant plus disponible en PwP2010.
    Harry

  5. #5
    Nouveau membre du Club
    Profil pro
    Inscrit en
    Septembre 2009
    Messages
    40
    Détails du profil
    Informations personnelles :
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations forums :
    Inscription : Septembre 2009
    Messages : 40
    Points : 33
    Points
    33
    Par défaut
    ça marche !
    alors là vous me sauvez la vie !
    mille merci !
    bonne journée
    merci encore pour votre aide précieuse

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

Discussions similaires

  1. Réponses: 33
    Dernier message: 12/03/2009, 17h37
  2. Réponses: 2
    Dernier message: 12/06/2006, 09h55
  3. Réponses: 13
    Dernier message: 11/05/2006, 16h26

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