Discussion :

[el_titou007]

Bonjour j'essaie de copier un tableau Excel vers Word.
J'ai lu plusieurs exemples mais j'ai toujours un souci.

En effet, l'une des colonnes du tableau excel est un lien hypertext. Ainsi, par exemple, il est affiché "MonSite" et cela fait référence à http://monsite.com. Or, mon document Word, une fois crée, affiche "{ HYPERLINK "http://monsite.com"}" et non pas "MonSite" comme sur le fichier Excel.

Le code que j'utilise est le suivant.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
 
 
    Range("B1:F20").Copy
 
    WordApp.Selection.EndKey Unit:=wdLine
    WordApp.Selection.TypeParagraph
    WordApp.Selection.TypeParagraph
    WordApp.Selection.PasteSpecial link:=True, DataType:=wdpastText, Placement:=wdInLine, DisplayAsIcon:=False
 
    WordApp.Selection.Paste
    WordDoc.Tables(1).AutoFitBehavior wdAutoFitWindow
 
    Application.CutCopyMode = False

J'ai essayé différents arguments pour PasteSpecial (ex : Datatype : wdPasteOLEObject) mais cela n'a pas marché. Je ne sais pas si c'est la copie qui est mauvaise pour le collage.

D'avance merci pour vos réponses.

[Invité]

Bonjour el_titou007,

Vous avez vérifié que dans Word : Outils, Options puis Onglet "Affichage" la case "Codes de champ" est bien décochée.

Amicalement.

[el_titou007]

Bonjour jacques,

c'était effectivement un problème d'option à décocher.

Je vous remercie beaucoup.