Enrique Bernal respondió:
Imagino que al transponer lo haces con todo y fórmulas, por lo que deberías cambiar esta parte de tu código : Selection.PasteSpecial Paste:=xlPasteAll, Por esta Selection.PasteSpecial Paste:=xlPasteValues, Así pegaras solo los valores y no las...