Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés.
Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Iniciar sesión Cerrar
Correo:
Contraseña:
Entrar
Recordar sesión en este navegador
Iniciar sesiónIniciar sesiónCrear cuentaCrear cuenta

Excel - copiar celdas activas a otra hoja

  Imprimir  
Vista:

copiar celdas activas a otra hoja

Publicado por vanesa (1 intervención) el 29/08/2011 05:02:51
hola no tengo mucha conocimiento en esto y ya busque por todo google.
pero estoy tratando de que me copie las celdas activas pero me copia todo como tengo que hacer muchas gracias.
Range("H2", Range("P18").End(xlDown)).Select 'seleciona desde A2 hacia abajo

Range("H2", Range("P18").End(xlToRight)).Select 'selecciona desde A2 hacia la derecha

'copia pedido

Range("H2:P18").Select
Selection.Copy

'pega pedido
Range("R2:Z18").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False

'pega pedido en listado de ventas

Selection.Copy
Sheets("LISTADO DE VENTAS").Select
ActiveWindow.SmallScroll Down:=-9
Range("A2").Select
Selection.Insert Shift:=xlDown
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

copiar celdas activas a otra hoja

Publicado por Victor hugo (3 intervenciones) el 04/09/2011 14:11:16
Acabo de leer tu inquietud Vanesa, no lo tengo tan claro lo que necesitas pero puede que te ayude este codigo en algo.

Sub AyudaCopia()
' Activamos la Hoja1 y copia la seleccion actual

Worksheets("Hoja1").Activate
ActiveCell.CurrentRegion.Select
Selection.Copy

' Selecciona la celda A2 y copiamos la selccion anterior

Range("A10:A10").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Application.CutCopyMode = False

End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar