Bonjour à tous,
première info, je ne connais pas du tout les langages mais j'ai besoin de créer un (une ) macro sous excel.
Je vais essayer de bien m'expliquer et de vous faire comprendre ce que je désire faire.
Dans mon tableau et dans une cellule il faudrait que lorsque je coche une case cela me génère un fichier Word avec un texte prédéfini.
Admettons que mon tableau possède 50 lignes avec pour chacune une case à cocher qui génère un fichier Word personnalisé.
mieux des mots une image :
j'ai bien trouver ce code qui fonctionne
mais ensuite..... suis largué
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13 Sub ECRIRE_word() Dim MonWord As Object Set MonWord = CreateObject("Word.Application") ' Création d'un nouveau document : MonWord.Documents.Add ' Ecriture d'un petit texte dans ce nouveau document : MonWord.Selection.TypeText "Tester écriture dans word depuis excel" ' Sauvegarde de ce document ainsi créé : MonWord.ActiveDocument.SaveAs "C:\test.doc" ' Fermeture de ce document : MonWord.ActiveDocument.Close Set MonWord = Nothing End Sub
Merci de vos retour.
Partager