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 Discussion :

Macro qui insére un paragraphe entier de code VS C++ 6.0


Sujet :

VBA

  1. #1
    Membre régulier
    Profil pro
    Inscrit en
    Août 2006
    Messages
    247
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations forums :
    Inscription : Août 2006
    Messages : 247
    Points : 106
    Points
    106
    Par défaut Macro qui insére un paragraphe entier de code VS C++ 6.0
    Bonjour,

    Je veux créer des macros pour copier des paragraphes de code déjà testé mais la je m'apercois que ça ne fonctionne pas comme prévu.

    Exemple de macro qui ne donne pas le résultat souhaité

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     
    Sub FileDialog()
    'DESCRIPTION: File Open / Save Dialog
     
    'Begin Recording
    ActiveDocument.Selection = "  const bool OpenDialog = TRUE;"
    ActiveDocument.Selection = "  const bool SaveDialog = FALSE;"
    ActiveDocument.Selection = " "
    ...
    ...
    End Sub
    Primo je perd les retours de ligne
    Secondo je dois taper (copier/coller) tous les
    ActiveDocument.Selection = "..."

    pas très efficace, existe t-il un moyen de copier des paragraphes entier de code facilement dans VS C++ 6.0 c'est une ancienne version ! Je ne connais pas le language VB alors peut-être existe t-il un command pour ça.

    Pierre de Montréal.

  2. #2
    Membre régulier
    Profil pro
    Inscrit en
    Août 2006
    Messages
    247
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations forums :
    Inscription : Août 2006
    Messages : 247
    Points : 106
    Points
    106
    Par défaut
    Bon j'ai trouvé.

    Il suffit de mettre le code à insérer dans des fichiers .TXT et de créer des macros avec le code suivant

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
     
    Sub FileOpenSaveDialog()
    'DESCRIPTION: File Open Save Dialog
    'Begin Recording
     Documents.Open "G:\MesMacros\FileOpenSaveDialog.txt","Text"
     ActiveDocument.Selection.SelectAll
     ActiveDocument.Selection.Copy
     ActiveDocument.Close dsSaveChangesPrompt
     ActiveDocument.Selection.Paste
    'End Recording
    End Sub
    comme ça on peut insérer le texte que l'on veut avec 3 clics de souris. Il faut juste modifier le nom du fichier texte de chaque nouvelle macro.

    Simple.

    Salut.

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

Discussions similaires

  1. Réponses: 3
    Dernier message: 03/04/2015, 17h24
  2. [XL-2003] Macro qui ne fonctionne que si j'insère un point d'arrêt
    Par nashifr dans le forum Macros et VBA Excel
    Réponses: 16
    Dernier message: 19/03/2014, 18h57
  3. Réponses: 11
    Dernier message: 21/07/2009, 17h32
  4. [E-00] Code VBA qui insère du code VBA
    Par _Sool_ dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 25/11/2008, 09h16
  5. Utilisateur qui insère une ligne
    Par Monstros Velu dans le forum MS SQL Server
    Réponses: 2
    Dernier message: 03/04/2006, 17h56

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