Modifier avec Words

Est-il possible de modifier un fichier pendant qu'il s’affiche dans une page Words ?

Code:

---

1 2 3 4 5 6 7 8 9 10

Dim Chemin$, Z$ Chemin$ = Scelta.C Z$ = Shell("C:\Program Files\Microsoft Office\office\winword.exe", vbMaximizedFocus) DoEvents SendKeys "^{o}" DoEvents SendKeys Chemin$ DoEvents SendKeys "{enter}" DoEvents

---

Je voudrai que la Police = Courrier New
Style = Gras
Taille = 12

oui,

mais plutôt que d'utiliser SendKey ... utilise l'automation .

voir le principe pour excel :

Applications Office

Merci pour ta réponse rapide.

Mais je ne maitrise pas excel et j'ai déjà beaucoup de peine à maitriser vb6 chaque chose à la fois.

pas besoin d'excel tu utilise word ... de la manière dont est utilisé word dans ces tutos.

tu rajoute la référence à word à ton projet et :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub TraiteWord() Dim oWord As New Word.Application Dim oDoc As Word.Document Set oDoc = oWord.Documents.Open("d:\tmp\test.doc") oWord.Visible = True With oDoc.Content.Font .Name = "Courrier New" .Size = 12 .Bold = True End With End Sub

---

Pour agir sur ton document, tu peu consulter et adapter les codes VBA du tuto :
Initiez vous au VBA Word

J’ai copies tes données dans mon programme,mais à la première ligne mi-donne
Erreur de compilation :
Type défini par l’utilisateur non défini

Et je ne sais pas comment le resoudre
Merci de m’avoir aides, merci

Citation:

---

Envoyé par bbil

p..
tu rajoute la référence à word à ton projet et :
...

---

Bonjour,
J’ai soldé carrément par un ‘autre système vue l’incapacité avec Word
Merci à bbil de m’avoir aidé, merci