De excel vers word

S

smotty

XLDnaute Occasionnel

• 19 Juin 2010

• #2

Re : De excel vers word

Bonjour,

Pourquoi ne pas sélectionner le tableau et le copier dans un document word directement?

 

Vote positif 0 Vote négatif

B

bbanor

XLDnaute Occasionnel

• 19 Juin 2010

• #3

Re : De excel vers word

Salut Smotty


Je voudrais automatiser cela à l'aide d'un bouton.

Merci

 

Vote positif 0 Vote négatif

Paritec

XLDnaute Barbatruc

• 19 Juin 2010

• #4

Re : De excel vers word

Bonsoir Bernard,
il semble que tu n'ais pas beaucoup d'audience avec ta demande!!!!
Tu veux pas en faire un pdf ou un txt ?
Pour les " .... " qui ne savent pas lire excel ? (car je pense que c'est toujours pour les mêmes?)
à te lire
a+
papou 🙂

 

Vote positif 0 Vote négatif

JNP

XLDnaute Barbatruc

• 19 Juin 2010

• #5

Re : De excel vers word

Bonjour le fil 🙂,
Tu trouveras tout ce qu'il te faut sur ce fil, sous réserve que ça se comporte bien sous Mac 🙄...
Si il y a besion de modifications, reviens vers nous 😉.
Bonne soirée 😎

 

Vote positif 0 Vote négatif

B

bbanor

XLDnaute Occasionnel

• 19 Juin 2010

• #6

Re : De excel vers word

Salut Paritec et JNP

Merci pour vos réponses.
Pour Papou : Non pas de pdf car ces "..." voudrais pouvoir modifier le tableau ou rajouter des choses dans ce tableau.
Pour JNP : j'ai cherché mais j'ai pas trouvé quelquechose qui marche sur mon fichier.

A l'aide please

 

Vote positif 0 Vote négatif

JCGL

XLDnaute Barbatruc

• 19 Juin 2010

• #7

Re : De excel vers word

Bonjour à tous,

bbanor à dit:

Pour Papou : Non pas de pdf car ces "..." voudrais pouvoir modifier le tableau ou rajouter des choses dans ce tableau

Cliquez pour agrandir...

Il est plus facile (...et moins couteux) de modifier sous Word que sur un *.pdf...

A+ à tous

 

Vote positif 0 Vote négatif

JNP

XLDnaute Barbatruc

• 20 Juin 2010

• #8

Re : De excel vers word

Re 🙂,

bbanor à dit:

Pour JNP : j'ai cherché mais j'ai pas trouvé quelquechose qui marche sur mon fichier.

Cliquez pour agrandir...

A condition de :
1) Adapter le code

Code:

Sub test()
Dim docWord As Word.Document
Dim appWord As Word.Application
Set appWord = New Word.Application
Application.DisplayAlerts = True
appWord.ShowMe
appWord.Visible = False
'Ouvre le document Word
Set docWord = appWord.Documents.Open(ThisWorkbook.Path & "\Memos.doc", ReadOnly:=False)
' Copie les données Excel de toute les feuilles
Sheets("Emploi du temps Niou").Range("A1:M12").Copy
' Colle les données dans Word
appWord.Selection.PasteExcelTable False, False, False
appWord.Selection.TypeParagraph
Application.CutCopyMode = False
docWord.Application.ActiveDocument.Save
appWord.Application.Quit
End Sub

2) d'aller dans l'éditeur VBA dans Outils -> Références et activer Microsoft Word XX.X Object Library
3) De créer un fichier .doc appelé Memos.doc à coté de ton fichier Excel et de le fermer.
La macro fonctionne (même sous Mac je pense).
Bon courage 😎

 

Vote positif 0 Vote négatif

B

bbanor

XLDnaute Occasionnel

• 20 Juin 2010

• #9

Re : De excel vers word

Salut JNP

J'ai fait exactement comme tu dis mais j'obtiens une erreur d'exécution '-2147221002 (-7FFBFE0A)' : erreur d'automation sur cette ligne-ci du code : Set appWord = New Word.Application.

A te lire
Merci encore

 

Pièces jointes

• Image 1.jpg

  52.2 KB · Affichages: 70
• Image 1.jpg

  52.2 KB · Affichages: 66
• Image 1.jpg

  52.2 KB · Affichages: 70

Dernière édition: 20 Juin 2010

Vote positif 0 Vote négatif

B

bbanor

XLDnaute Occasionnel

• 20 Juin 2010

• #10

Re : De excel vers word

tatiak à dit:

Salut 🙂
écrit plutôt :
Set appWord = CreateObject("Word.Application")
🙂 tatiak

Cliquez pour agrandir...

Salut tatiak

Je viens d'essayer mais toujours le même message lors du debbugage. Peut être est ce le fait que je suis sous Mac .

A te lire et merci encore

 

Vote positif 0 Vote négatif

B

bbanor

XLDnaute Occasionnel

• 21 Juin 2010

• #11

Re : De excel vers word

Re Bonjour à tous

Quelqu'un aurait il pu m'aider s'il vous plaît ?
Je compte vraiment sur vous

A vous lire

 

Vote positif 0 Vote négatif