Necesitaría tu consejo si pudieras ayudarme porque mi conocimiento de VBA es muy pobre. Tengo 4 columnas y miles de filas, me gustaría que esa primera fila se copie y pegue transpuesta en otro libro de trabajo presionando un botón de comando, luego presione el segundo botón para sobrescribir el copiar y pegar anterior y así sucesivamente (en el segundo libro de trabajo Tengo algunas fórmulas que se aplicarán a los nuevos valores y tengo que verificar los resultados). ¡Muchas gracias de antemano!

Aquí está el código que lo hice para copiar y pegar de un libro a otro (el código se mueve a la siguiente fila pero no copia y pega los valores en el otro libro, en el otro libro están mismos primeros valores, así que aquí está mi dilema):

Private Sub CommandButton1_Click()

ActiveCell.Offset(1, 0).Activate

Workbooks("Book1.xlsm").Worksheets("Sheet2").Range("B4:E4").Copy
Workbooks("Book2.xlsm").Worksheets("Sheet1").Range("B20").PasteSpecial Transpose:=True

Application.CutCopyMode = False

End Sub