Discussion :

[funkyf]

Bonjour Les développeurs

J'essaie d'écrire un Word qui ait une présentation correcte à partir d'une macro Excel.
Je n'arrive pas à utiliser les styles par défauts "Titre 1", "sans interlignes" et autres noms de styles par défaut trouvés avec la macro Word.
Je sais que les correspondances macro word et macro excel ne sont pas parfaites mais j'arrive à utiliser les paramètre "bold" et "size" en deuxième partie de code.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
With WordObj.Selection
    .Style = WordObj.Styles("Titre")
    .TypeText text:=titre1
    .Style = ActiveDocument.Styles("Sans interligne")
    .TypeParagraph
    Do While tableau1(h) <> Empty
        .TypeText text:=tableau1(h)
        .TypeParagraph
        h = h + 1
    Loop
h = 0
    .Font.Size = 22
    .TypeParagraph
    .Font.Bold = True
    .TypeText text:=titre2
    .Font.Size = 12
    .Font.Bold = False
    .TypeParagraph
    Do While tableau2(h) <> Empty
        .TypeText text:=tableau2(h)
        .TypeParagraph
        h = h + 1
    Loop
 
End With

Des idées sur le fond de mon problème?

Vive le fromage

[78chris]

Bonjour

Plutôt que de bidouiller les styles Word depuis Excel, il serait plus simple de créer une feuille de styles dans Word (modèle .dot) puis d'utiliser ce modèle pour appliquer les styles...

[funkyf]

Bonjour

Plutôt que de bidouiller les styles Word depuis Excel, il serait plus simple de créer une feuille de styles dans Word (modèle .dot) puis d'utiliser ce modèle pour appliquer les styles...

Bonjour

L'idée est peut-être bonne mais alors je ne la comprend pas du tout:
-Les Styles par défaut de mon Word me vont très bien, je n'ai pas a priori besoin de créer une feuille de style.
-Même une fois que je créé une feuille de style (par macro word si j'ai compris?) je ne sais toujours pas faire appel à ses styles dans ma macro Excel qui est la source du contenu à mettre dans le word.

Fanny

Je préfère apprendre à faire du fromage