Error al pegar rango

14/06/2007 - 12:41 por Thebigmik | Informe spam
Hola

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

Gracias a todooosss
 

Leer las respuestas

#1 Héctor Miguel
14/06/2007 - 20:50 | Informe spam
hola, 'anonimo/a' !

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.

Preguntas similares