Copie de donnée de word vers excel

[seghi0051]

Bonjour,
J'ai un petit probleme, je voudrais copier des données de word vers des cellule excel, mais je n'y arrive pas .
donc si vous avez une solution je suis preneur.

Merci

 

[Salmander]

Re : Copie de donnée de word vers excel

Spontanément je proposerais Ctrl+C/Ctrl+V mais je suppose que ce n’est pas suffisant.
Je pense qu’il manque quelques informations quant à la nature des données et à leur mode de copiage…

 

[seghi0051]

Re : Copie de donnée de word vers excel

Merci de votre réponse mais non sa ne me suffit pas, donc voilà mon problème j'ai une feuille word ou se trouve plusieur tableau, j'ai créer une macro sur excel afin qu'il rapatrie les données des tableaux word mais le problème c qu'il mets tous les tableaux les uns sur les autres, "je ne sais pas si je suis claire" voici ma macro. et encore merci de votre aide.
Sub Word()
'nécéssite d'activer la référence Microsoft Word xx.x Object Library
Dim WordApp As Word.Application
Dim WordDoc As Word.Document
Dim Fichier As String
i = 1
'le document Word est supposé fermé avant le lancement de la macro
Fichier = "C:\g011796.docx" 'adapter le chemin
Set WordApp = CreateObject("Word.Application") 'creation session Word
WordApp.Visible = False 'pour que word reste masqué pendant l'opération
Set WordDoc = WordApp.Documents.Open(Fichier) 'ouverture du fichier Word

Do While i < 3
WordDoc.Tables(i).Range.Copy 'copie du tableau Word
'dans Word chaque tableau est indexé
'ici l'index est à 2 car le premier index correspond au cadre autour du titre du
'document Word
i = i + 1
Range("A1").Select
ActiveSheet.Paste 'collage des données dans Excel
Loop


WordDoc.Close False 'ferme le document Word sans sauvegarde
WordApp.Quit 'ferme l'application Word

End Sub