Транспонировать таблицу в Word

5894
Jay

Есть ли способ транспонировать (поменять местами строки и столбцы) в пост-ленте Microsoft Word (в настоящее время используется 2013)?

Например, в этой таблице я хочу, чтобы верхние заголовки шли слева (én, te и т. Д.), А левые заголовки (van, megy, jön) - вверх (очевидно, с перемещением данных) table to be transposed

Я в настоящее время копирую и вставляю в Excel, копирую и вставляю снова, но выбираю специальный параметр вставки: «Транспонировать», затем копировать обратно в слово. Но есть ли правильный способ сделать это изначально?

transpose menu

3

3 ответа на вопрос

1
András

Я думаю, что использование Excel является единственным способом.

и исправить содержание: ми VAGYUNK, а не VANJUNK András 10 лет назад 1
: / Я думаю, люди не так часто используют эту опцию. LOL спасибо за помощь моего венгерского хотя! Jay 10 лет назад 0
Люди никогда не должны использовать это, поскольку это совершенно неправильно :) Higgy nekem, elég gyakran használom;) András 10 лет назад 1
Даже Microsoft [предлагает использовать Excel] (http://support.microsoft.com/kb/143321) для этой задачи. Adam 10 лет назад 3
1
David French

Попробуйте этот макрос:

Sub transpose01() ' ' transpose01 Macro ' ' ' to transpose rows and columns in a table Dim NumCols As Long, NumRows As Long, RowCounter As Long, ColCounter As Long Dim CellText As String NumCols = ActiveDocument.Tables(1).Columns.Count NumRows = ActiveDocument.Tables(1).Rows.Count ActiveDocument.Tables.Add Range:=Selection.Range, NumRows:=NumCols, NumColumns:=NumRows RowCounter = 0 While RowCounter < NumRows ColCounter = 0 While ColCounter < NumCols CellText = ActiveDocument.Tables(1).Cell(RowCounter + 1, ColCounter + 1).Range.Text CellText = Left(CellText, Len(CellText) - 2) ActiveDocument.Tables(2).Cell(ColCounter + 1, RowCounter + 1).Range.InsertBefore CellText ColCounter = ColCounter + 1 Wend RowCounter = RowCounter + 1 Wend '  End Sub
Добро пожаловать в Супер пользователя. Можете ли вы также дать краткое, простое английское объяснение того, что делает этот макрос (или добавить соответствующие комментарии в соответствии с кодом)? Twisty Impersonator 6 лет назад 0
0
tigr

Любой опыт с этим: https://www.extendoffice.com/documents/word/1413-word-transpose-rows-and-columns-table.html есть ли плата за бесплатную пробную версию?

Похожие вопросы