Transpose table in Word

Is there a way to transpose (swap rows and columns) in post-ribbon Microsoft Word (currently using 2013)?

For example, in this table, I want the top headings to go on the left (én, te, etc), and the left headings (van, megy, jön) go to the top (obviously with the data moved also)

I currenly copy and paste into Excel, copy and paste again but choose the special paste option : Transpose, then copy back to word. But is there a proper way to do this natively?

3 Answers

I think using Excel is the only way.

Try this macro:

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 

Any experience with this: there maybe a fee after free trial?