Jak skopiować tabele Word do Excela bez dzielenia komórek na wiele wierszy?

33

Mam dane w tabeli Word zawierającej podziały wierszy i akapitów. Kiedy kopiuję dane do Excela, dzieli każdy wiersz i akapit, który chcę, na wiele komórek. Jak skopiować dane do programu Excel i zachować przerwy?

microsoft-excel microsoft-word

— skia.heliou
źródło

39

Będziesz musiał trochę zastąpić postać. To dość prosta poprawka.

W słowie:

Wybierz cały stół w programie Word.
Otwórz okno dialogowe „Znajdź i zamień” (np. Wpisując Ctrl+ H).
W polu „Znajdź co” wpisz ^l. Spowoduje to wybranie wszystkich podziałów linii.
- Możesz wybrać podział akapitu, wprowadzając ^p.
W polu „Zamień na” wpisz ^v.
- Jest to skrót do symbolu akapitu ¶, znanego również jako „pilcrow”.
- Możesz zamienić znaki akapitu na dwa pilcrows, aby ułatwić ich późniejsze zastąpienie.
Kliknij „Zamień wszystko”.
Skopiuj dane tabeli do schowka.

W programie Excel:

Wklej tabelę w żądanej lokalizacji w programie Excel.
Po wybraniu danych tabelarycznych otwórz okno dialogowe „Znajdź i zamień” (ponownie Ctrl+ Hdziała).
W polu „Znajdź co” wpisz następujący kod Alt: Alt+ 0182. Pojawia się pilcrow.
- Aby wprowadzić kod Alt, przytrzymaj Altklawisz podczas wpisywania cyfr na klawiaturze numerycznej. Może to pomóc mieć Num Lock.
W polu Zamień wprowadź następujący kod Alt: Alt+ 0010.
- Ten kod jest wprowadzany jako podział pojedynczej linii. Nic się nie pojawia, chociaż kursor może się zmienić.
Kliknij „Zamień wszystko”.

Bibliografia:

— skia.heliou
źródło

Ta odpowiedź (z trywialnymi, kosmetycznymi różnicami) pojawiła się na Microsoft.com w Zachowaj komórki wieloliniowe podczas wklejania tabeli Worda do Excela . I BTW, uważam, że (Alt) +010 jest wystarczająco dobry; Nie potrzebuję dwóch zer wiodących.

— G-Man,

@ G-Man Ha ... gdybym tylko znalazł to wcześniej! Szkoda, że wtedy nie pracowałem w pakiecie Office 2007. Czy masz na myśli wiodące jedno zero (Alt + 010) czy pierwsze dwa (Alt + 10)?

— skia.heliou

Dzięki - Mam wszystkie kroki do pracy na komputerze Mac (w programie Excel 15), z wyjątkiem ostatniego - nie udało mi się wprowadzić alt-0010 lub podziału linii. Jakieś sugestie? Próbowałem skopiować i wkleić podział linii z innego źródła, a także kilka innych sztuczek.

— JayCrossler,

Office 2013 tutaj, to nie działa. Nadal pojawia się wiele wierszy w programie Excel po zamianie.

— Neil,

16

Jest łatwiejszy sposób.

Jeśli masz konto Google Gmail, możesz otworzyć Dysk Google i utworzyć nowy arkusz kalkulacyjny, a następnie skopiować całą tabelę z Microsoft Word do arkusza kalkulacyjnego Google. Po uzyskaniu pożądanego formatu możesz skopiować tabelę do programu Microsoft Excel.

— Abe Basani
źródło

5

... lub ... po prostu zostaw to na Dysku :)

— GreenAsJade

Musiałem skopiować z Worda do Google Doca, a następnie z Google Doca do Google Arkusza (w przeciwnym razie podział linii zniknie). W każdym razie +1

— użytkownik2518618

1

Odkryłem, że możesz użyć LibreOffice Calc.

Wybierz swoją tabelę Word
Kopiuj
W LibreOffice Calc, Wklej specjalnie jako HTML
Zapisz w swoim ulubionym formacie

Twoja tabela nie zostanie podzielona na wiele komórek.

— Molo
źródło

Działa dobrze, aby uzyskać w LibreOffice Calc. A następnie, aby przejść z Calc do Excela: 1. wybierz tabelę Calc 2. Skopiuj 3. W Microsoft Excel, Wklej specjalnie jako DIF

— Paul Gobée

0

Zrobiłem funkcję vba, aby usunąć znak nowej linii, który spowodował podział komórek w programie Excel przed skopiowaniem do programu Excel.

sub RemoveNewLinesFromTabelCells (tblnumber jako liczba całkowita)
„usuń znak nowej linii z każdej komórki w wybranej tabeli tabeli według numeru tabeli
  przyciemnij x tak długo, y tak długo, liczba kolumn tak długo, jak liczba wierszy
  columncount = Activedocument.Tables (tblNumber) .Range.Columns.Count
  rowcount = Activedocument.Tables (tblNumber) .Range.Rows.Count
  dla x = 1 do liczby wierszy
     dla y = 1 do licznika kolumn
        ActiveDocument.Tables (tblNumber) .cell (x, y) .Range.Text = Zamień (ActiveDocument.TAbles (tblNumber) .cell (x, y) .Range.Text, Chr (13, „”)
     następny rok
  następny x
napis końcowy

— kodekaina
źródło