Comment copier des tableaux Word dans Excel sans fractionner les cellules en plusieurs lignes?

33

J'ai des données dans un tableau Word qui incluent des sauts de ligne et de paragraphe. Lorsque je copie les données dans Excel, il fractionne chaque ligne et paragraphe que je souhaite en plusieurs cellules. Comment copier les données dans Excel et conserver les pauses?

microsoft-excel microsoft-word skia.heliou
la source

Réponses:

39

Vous devrez faire un peu de remplacement de personnage. C'est une solution assez simple.

Dans Word:

  1. Sélectionnez l'intégralité de votre tableau dans Word.
  2. Ouvrez la boîte de dialogue "Rechercher et remplacer" (par exemple, en tapant Ctrl+ H).
  3. Dans le champ "Rechercher quoi", entrez ^l. Cela sélectionnera tous les sauts de ligne.
    • Vous pouvez sélectionner des sauts de paragraphe en entrant ^p.
  4. Dans le champ "Remplacer par", entrez ^v.
    • Il s'agit d'un raccourci pour le symbole de paragraphe ¶, également connu sous le nom de "pilcrow".
    • Vous souhaiterez peut-être remplacer les marques de paragraphe par deux pilcrows pour faciliter le remplacement ultérieur.
  5. Cliquez sur "Remplacer tout".
  6. Copiez les données du tableau dans le presse-papiers.

Dans Excel:

  1. Collez votre tableau à l'emplacement souhaité dans Excel.
  2. Avec les données tabulaires sélectionnées, ouvrez la boîte de dialogue "Rechercher et remplacer" (encore une fois, Ctrl+ Hfonctionne).
  3. Dans le champ "Rechercher quoi", entrez le code Alt suivant: Alt+ 0182. Un pilcrow apparaît.
    • Pour entrer un code Alt, maintenez la Alttouche enfoncée tout en tapant les chiffres sur le pavé numérique. Il peut être utile de continuer Num Lock.
  4. Dans le champ Remplacer, entrez le code Alt suivant: Alt+ 0010.
    • Ce code entre dans un saut de ligne unique. Rien n'apparaît, bien que votre curseur puisse changer.
  5. Cliquez sur "Remplacer tout".

Les références:

skia.heliou
la source
Cette réponse (avec des différences esthétiques triviales) est apparue sur Microsoft.com à Retenir les cellules multilignes lors du collage du tableau Word dans Excel . Et, BTW, je trouve que (Alt) +010 est assez bon; Je n'ai pas besoin des deux zéros principaux.
G-Man dit `` Réintègre Monica '' le
@ G-Man Ha ... si seulement j'avais trouvé ça plus tôt! Dommage que je ne travaillais pas dans Office 2007 à l'époque. Aussi, voulez-vous dire le premier zéro (Alt + 010) ou les deux premiers (Alt + 10)?
skia.heliou
Merci - j'ai obtenu toutes les étapes pour travailler sur un Mac (dans Excel 15) sauf la dernière - je n'ai pas pu obtenir l'alt-0010 ou le saut de ligne entré. Aucune suggestion? J'ai essayé de copier-coller un saut de ligne d'une autre source ainsi que quelques autres astuces.
JayCrossler
Office 2013 ici, cela ne fonctionne pas. Toujours obtenir plusieurs lignes dans Excel après le remplacement.
Neil
17

Il existe un moyen plus simple.

Si vous avez un compte Google Gmail, vous pouvez ouvrir Google Drive et créer une nouvelle feuille de calcul, puis copier l'intégralité du tableau de Microsoft Word dans la feuille de calcul Google. Une fois que vous l'avez dans le format souhaité, vous pouvez ensuite copier le tableau dans Microsoft Excel.

Abe Basani
la source
5
... ou ... laissez-le simplement dans Drive :)
GreenAsJade
J'ai dû copier de Word vers Google Doc puis de Google Doc vers Google Sheet (sinon les sauts de ligne disparaîtraient). +1 quand même
user2518618
1

J'ai découvert que vous pouvez utiliser LibreOffice Calc.

  1. Sélectionnez votre tableau Word
  2. Copie
  3. Dans LibreOffice Calc, Collage spécial au format HTML
  4. Enregistrez dans votre format préféré

Votre tableau ne sera pas divisé en plusieurs cellules.

Jetée
la source
Fonctionne bien pour entrer dans LibreOffice Calc. Et puis pour passer de Calc à Excel: 1. sélectionnez votre table Calc 2. Copiez 3. Dans Microsoft Excel, Collage spécial comme DIF
Paul Gobée
0

J'ai fait une fonction vba pour supprimer le retour à la ligne qui a provoqué la division des cellules en excel avant de copier en excel.

sub RemoveNewLinesFromTabelCells (tblnumber as integer)
'supprimer la nouvelle ligne de chaque cellule du tableau sélectionné, par numéro de tableau
  dim x long, y aussi long, nombre de colonnes aussi long, nombre de lignes aussi long
  columncount = Activedocument.Tables (tblNumber) .Range.Columns.Count
  rowcount = Activedocument.Tables (tblNumber) .Range.Rows.Count
  pour x = 1 au nombre de lignes
     pour y = 1 au nombre de colonnes
        ActiveDocument.Tables (tblNumber) .cell (x, y) .Range.Text = Remplacer (ActiveDocument.TAbles (tblNumber) .cell (x, y) .Range.Text, Chr (13, "")
     y suivant
  suivant x
end sub
codécaïne
la source