code VBA Imprimer dans word

Re : code VBA Imprimer dans word

bonsoir
il faut créer un fichier texte (.doc) que tu ouvriras avec Word

Sub Essai1()
NomDeTonFichier$ = "Toto.doc" ' < ! Doc pour Word
Open NomDeTonFichier$ For Output As #1
Print #1, "ici les lignes que tu veux envoyer..."
Print #1, "ici les lignes que tu veux envoyer..."
Print #1, "ici les lignes que tu veux envoyer..."
Close #1
End Sub

Sub Essai2()
NomDeTonFichier$ = "Toto.doc" ' < ! Doc pour Word
Open NomDeTonFichier$ For Output As #1
For NoDeLig = 1 To NombreDeLigne '<<<<<<<<à toi de voir
Print #1, Cells(NoDeLig, NoDeCol) '<<<<<<<<<nos de lig et la Col de ta feuille
Next
Close #1
End Sub

Roland

Re : code VBA Imprimer dans word

ne marche pas