Error al pegar rango

hola, 'anonimo/a' !

Mostrar la cita

Cuando inteto pegar un rango de celdas en la fila 1 de la misma hoja me salta el error 1004 (la seleccion no es valida)
Esto es lo que hago
'copiar el rango de datos
ActiveSheet.Range(SuperiorIzq, InferiorDrcha).Copy
'pegado traspuesto
ActiveSheet.Range("a1").PasteSpecial xlPasteValues, xlPasteSpecialOperationNone, False, True

1) dependiendo de cuales fueran las referencias *reales* de tus variables [SuperiorIzq e InferiorDrcha]
si el rango destino [transpuesto] hace *interseccion* con el rango origen [el que se copia]...
aqui es donde salta el error por una de las causas [entre otras] ;)

2) prueba tratando de hacerlo directamente [no por macros] en la hoja de calculo y...

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.