aakpa
Messages postés57Date d'inscriptionmardi 24 mai 2005StatutMembreDernière intervention10 janvier 2016
-
24 juin 2005 à 09:45
calla25
Messages postés85Date d'inscriptionlundi 26 janvier 2004StatutMembreDernière intervention25 octobre 2007
-
27 juin 2005 à 14:26
calla25
Messages postés85Date d'inscriptionlundi 26 janvier 2004StatutMembreDernière intervention25 octobre 2007 24 juin 2005 à 10:01
salut
j'ai une autre solution qui parait un peu plus complexe mais qui me semble quand meme bien
ca ouvre une document Word que tu doit enregistrer
voilà le code:
Dim DocWord As Word.Document
Dim AppWord As Word.Application
Set AppWord = New Word.Application
AppWord.ShowMe
AppWord.Visible = True
'Ajoute un document
AppWord.Documents.Add
With AppWord.Selection
.TypeParagraph 'pour passer des lignes
.TypeText Text:="ton texte1"
.TypeParagraph
.TypeText Text:="ton texte2"
.TypeParagraph
End With
bon courage