Répondre à la discussion
Affichage des résultats 1 à 6 sur 6

Macro Word



  1. #1
    Eric78

    Macro Word


    ------

    Bonjour

    En fait je commence à en avoir marre de colorer à la main mes DM d'info en Caml, donc j'ai pensé à faire des macros qui feraient mon boulot. Ca marche bien pour tout ce qui est coloration de mots clefs, mais je vois pas comment je pourrais faire pour les commentaires: par exemple, si j'ai un truc du genre

    blabla (*ceci est un commentaire*)

    J'aimerais que tout ce qui est entre (* et *) soit coloré. Si quelq'un sait comment faire, ca m'aiderais beaucoup!

    Eric

    -----
    Pour un TPE sur la cryptographie ou les trous noirs, allez voir mon profil.

  2. Publicité
  3. #2
    kael kael

    Re : Macro Word

    Salut

    Pour la macro Word, je ne sais pas, mais pour ce que tu veux faire tu peux utiliser un éditeur qui fait la coloration syntaxique.
    Par exemple ConTEXT , il ne gère pas la coloration du Caml mais il est possible de définir soi même la façon de colorer un langage. Il permet également d'exporter les fichiers au format HTML ou au format RTF

  4. #3
    Eric78

    Re : Macro Word

    Dommage que ca soit pour windows... (je suis sous Mac OSX)
    Merci quand même.

    Eric
    Pour un TPE sur la cryptographie ou les trous noirs, allez voir mon profil.

  5. #4
    cricri

    Re : Macro Word

    pour mac je sais pas si ca marchera
    j ai pas trouver certaine instruction donc j ai programme ca mechament
    Sub Macro1()
    Dim i As Long
    Dim j As Long
    '
    For i = 1 To ActiveDocument.Characters.Coun t
    If ActiveDocument.Characters(i) = "*" Then
    For j = i + 1 To ActiveDocument.Characters.Coun t
    If ActiveDocument.Characters(j) = "*" Then
    Selection.MoveUp Unit:=wdScreen, Count:=100
    Selection.MoveRight Unit:=wdCharacter, Count:=i - 1
    Selection.MoveRight Unit:=wdCharacter, Count:=j - i + 1, Extend:=wdExtend

    With Selection.Font
    .Name = "Times New Roman"
    .Size = 12
    .Bold = False
    .Italic = False
    .Underline = wdUnderlineNone
    .UnderlineColor = wdColorAutomatic
    .StrikeThrough = False
    .DoubleStrikeThrough = False
    .Outline = False
    .Emboss = False
    .Shadow = False
    .Hidden = False
    .SmallCaps = False
    .AllCaps = False
    .Color = wdColorSeaGreen '<--- en vert
    .Engrave = False
    .Superscript = False
    .Subscript = False
    .Spacing = 0
    .Scaling = 100
    .Position = 0
    .Kerning = 0
    .Animation = wdAnimationNone
    End With

    Exit For
    End If

    Next j
    i = j
    End If
    Next i

    End Sub

  6. A voir en vidéo sur Futura
  7. #5
    Eric78

    Re : Macro Word

    Je m'en vais tester ca tout de suite, un grand merci à toi Cricri
    Pour un TPE sur la cryptographie ou les trous noirs, allez voir mon profil.

  8. #6
    Eric78

    Re : Macro Word

    Ca marche, mais c'est très très lent (plus de 4 min pour deux pages lol), je vais voir s'il y a pas moyen de trouver une fonction intégré pour trouver le prochain indice du *.
    Pour un TPE sur la cryptographie ou les trous noirs, allez voir mon profil.

  9. Publicité

Discussions similaires

  1. Cherche petite macro word
    Par azeto dans le forum Logiciel - Software - Open Source
    Réponses: 3
    Dernier message: 18/09/2007, 07h03
  2. M'aider à créer une petite macro sous word ou excel
    Par azeto dans le forum Logiciel - Software - Open Source
    Réponses: 29
    Dernier message: 16/04/2007, 12h12
  3. Photo macro
    Par invite87654345678 dans le forum Technologies
    Réponses: 9
    Dernier message: 23/12/2006, 18h00
  4. macro modèle
    Par samouna dans le forum Électronique
    Réponses: 0
    Dernier message: 06/06/2006, 20h20
  5. macro xcel
    Par amandine22 dans le forum Logiciel - Software - Open Source
    Réponses: 0
    Dernier message: 15/07/2004, 18h22
Découvrez nos comparatifs produits sur l'informatique et les technologies.