El área de diseño de la tabla dinámica de 2003 (Tabla dinámica clásica en Excel) no se presenta en las versiones de 2007, 2010, 201, 2016, 2019, 2021 y 365. No permitiendo arrastrar los campos desde el panel de campos de la tabla dinámica.
Para trabajar con el diseño de la tabla dinámica clásica, disponemos de dos opciones:
- OPCIONES DE TABLA DINÁMICA. Para una tabla dinámica:
Insertar la tabla dinámica. Ir a: Cinta de opciones
Pestaña: Insertar Grupo: Tablas Tabla dinámica Tabla dinámica 
. Mostrará cuadro de diálogo de crear tabla dinámica.Indicar el rango o la tabla de datos.
Indicar donde insertar la tabla dinámica.
Pulsar el botón Aceptar. Cierra la ventana e inserta el área de diseño de la tabla dinámica predeterminada.
Clic sobre el área de diseño de la tabla dinámica.
Ir a: Cinta de opciones
Pestaña: Opciones (Herramienta de tabla dinámica) Grupo: Tabla Dinámica Opciones 
. Mostrará cuadro de diálogo de opciones de tabla dinámica.
Clic sobre pestaña: Mostrar
Activar casilla: Diseño de tabla dinámica clásica (permite arrastrar campos en la cuadrícula). Opción deseada.Pulsar el botón Aceptar. Mostrará la vista clásica.
- MACRO. Si trabajamos habitualmente con tablas dinámicas, podemos crear una macro que nos convierta la vista de diseño a clásica.
Con Excel abierto.
Pulsar la tecla Alt y mantener pulsada
Pulsar la tecla F11. Mostrará el editor de Visual Basic.Ir a: Barra de Menú
Insertar 
Módulo. Mostrará la ventana del módulo donde escribimos la macro.Escribir el código de la macro:
Sub Td_clasica()
Dim Contador As Integer, i As Integer
Contador = ActiveSheet.PivotTables.CountFor i = 1 To ContadorWith ActiveSheet.PivotTables(i)
.InGridDropZones = True
.RowAxisLayout xlTabularRow
End With
Next iEnd Sub
Guardar el libro con la extensión *.xlsm. Libro habilitado para macros.
Ir a: Insertar un acceso directo a la macro en la barra de acceso rápido. O en la cinta de opciones.
Insertar la tabla dinámica. Mostrará el área de diseño predeterminado.
Ejecutar la macro. Mostrará el área de diseño clásico para la tabla dinámica.
Podemos activar la tabla dinámica clásica que permite cambiar el área de diseño, mediante el método deseado.
Excel Avanzado
buenas tardes
Una pregunta cuando ejecuto la macro ps al verificar por opciones de la tabla dinamica aparece señalado la casilla de verificacion DISEÑO DE TABLA DINAMICA CLASICA pero los campos continuan en filas ps se que la macro esta ordenada por filas pero cuando la habilito manual me diseña mi tabla como deseo no como excel me la cree.
tengo varios campos
with Tdinamica.pivofields("fecha")
.orientation= xlrowfield
.position=3
end with
witd Tdinamica.pivofields("codigo")
.orientation=xlrowfield
.position=4
end with
Y asi sucesivamente ya que tengo varios campos de la tabla dinamica
Agradeceria tu ayuda que deberia hacer.
Hola Hector,
La tabla dinámica clásica se diferencia de la actual en el diseño del área de la tabla dinámica que presenta el área de filas, columnas, datos y página. Por lo que no tiene nada que ver con como coloca tu macro los datos.
La instrucción en el código ".orientation= xlrowfield" indica que el campo se sitúe en filas, si deseas en columna, deberás cambiar por ".Orientation = xlColumnField".
Y la posición indica el orden de los campos en el área deseado.
Revisa el código de tu macro.
Saludos.