Necesito una macro que copie datos de columna a otra sin formato

Quisiera crear una macro que me copie ciertos datos de unas columnas a otra hoja, por ejemplo tengo que copiar las columnas A B G H I desde la linea 13 hasta que no hallan mas datos en la columna y pegarlos en una nueva hoja de calculo. Alguien podría darme una mano, gracias a todos.

NOTA: Esta pregunta ya fue resuelta por un experto, pero me gustaría saber como realizo el procedimiento sin copiar el formato, ni bordes, solo los valores de la celda.

1 respuesta

Respuesta
2

Como la primera la hice yo, también te contesto a esta:

Sub copiado()
Range("a13:b" & Range("a65000").End(xlUp).Row).Copy
Sheets("hoja2").Cells(1, 1).pastespecial paste:=xlvalues
Range("g13:i" & Range("g65000").End(xlUp).Row).Copy
Sheets("hoja2").Cells(1, 3).pastespecial paste:=xlvalues
End Sub

recuerda finalizar la consulta

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Ayuda con macro, copiar y pegar datos.

Agradecería que me echaran una mano con está macro que intento desarrollar; En la hoja 1, tengo 4 columnas que copio y pego (pegado especial sólo valores) a 4 columnas a la hoja 2 (columnas C, D, E, F). Teniendo en cuenta que me pega en la primera...
1 respuesta

Capturar información de varias hojas en una nueva

Estoy tratando de automatizar la captura de información a partir de varias hojas de un mismo libro de excel, una vez grabada la macro esta solo me efectúa el proceso hasta la hoja 4 del libro y en total son 287 hojas. Que sentencia debo incluir al...
1 respuesta

Copiar rango de celdas a otra hoja con pegado especial (Luis Mondelo)

Encontré esta macro de Luis Mondelo que copia un rango especifico de celdas en otra hoja en la primera fila libre: Sub copiar() fila = sheets("hoja2").Range("a65000").End(xlUp).Row + 1 Range("a6:n6").Copy Destination:=Sheets("hoja2").Cells(fila, 1)...
1 respuesta

Macro para informes diarios

Tengo una tabla (la hoja se llama VENTAS ACTIVIDADES), con todas las actividades que voy vendiendo, esta tabla tiene 19 columnas(Fecha de actividad, Hora, Actividad, Nombre del cliente, Tlf...). Aquí almaceno todos los datos de las actividades que...
3 respuestas

¿Cómo hago una macro en excel para copiar todos los datos d varias hojas a una nueva?

Tengo 5 hojas en un libro de excel 2003, necesito pasar con una macro todos los datos de 3 de las hojas a una nueva hoja, pero poniendo todos los datos uno debajo del otro a partir de la fila 2 porque la fila 1 son los títulos de las columnas. (Las...
2 respuestas

Juntar información en una sola hoja

Espero que me puedan ayudar con una macro que permita juntar la información de 6 hojas que tengo en una sola hoja teniendo en cuenta que la información de cada hojapuede cambiar en cantidades, el formato que utilizo es una base de datos en 2003,...
1 respuesta

Traspasar datos de dos hojas a una tercera

Ojalá entiendas lo que necesito y me puedas ayudar. Tengo una "hoja3" a la que quiero traer, mediante una macro, los datos de determinadas columnas de la "hoja1" y de la "hoja2" y colocarlos en determinadas columnas de la hoja3. En un primer proceso...
2 respuestas

Macro copiar y pegar en celdas consecutivas, días distintos.

Tengo una hoja donde relleno la caja que he echo en el bar cada dia, me gustaría que al pulsar una botón, me copie una celda en otra pagina, i al dia siguiente al volver a pulsar el botón me vuelva a copiar esa misma celda pero en la celda...
1 respuesta

Macro para guardar información de hoja1 a hoja2 con fecha. Excel

Espero que me puedan ayudar, normalmente imprimo todos los días hojas en excel, podrían ayudarme en un macro para poder guardalo en la siguiente hoja, correlativo uno debajo de otro y ordenados por fecha. El formato que relleno datos es de 5 columnas...
1 respuesta

Copiar datos de una hoja a otro libro

He copiado esta macro de Luis Mondelo que es perfecta de una hoja a otra hoja del mismo libro que va perfecta. Sub ejemplo() 'por luismondelo Sheets("1").Select Range("a1:d15"). Copy Sheets("2"). Range("a65000").End(xlUp).Offset(1, 0).PasteSpecial...
1 respuesta