Visual Basic para Aplicaciones - Copiar y pegar datos en diferentes hojas

Life is soft - evento anual de software empresarial
 
Vista:

Copiar y pegar datos en diferentes hojas

Publicado por Jaime (6 intervenciones) el 16/01/2019 04:11:52
Hola amigos necesito de su ayuda
Quiero copiar unos datos de filas de una hoja
Y pegarla en diferentes hojas del mismo libro
Gracias
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
Imágen de perfil de Antoni Masana
Val: 1.151
Oro
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Copiar y pegar datos en diferentes hojas

Publicado por Antoni Masana (409 intervenciones) el 16/01/2019 06:48:50
Buenas Jaime,

Puedo ayudarte si me das más información

Saludos.
\\//_
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

Copiar y pegar datos en diferentes hojas

Publicado por Jaime (6 intervenciones) el 16/01/2019 15:09:47
Que tal antoni mira tengo una hoja en la cual capturó
Nombre, nivel, jornada, descanso, L, M, M, J, V, S D,
LLAMADO CONCEN

con fórmulas lo pegó en diferentes formatos en hoja 1 hoja 2 y así hasta 90

Los días de la semana están en línea y en el formato esta en columna te mando el archivo a tu correo gracias por tu atencion
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
Imágen de perfil de Antoni Masana
Val: 1.151
Oro
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Copiar y pegar datos en diferentes hojas

Publicado por Antoni Masana (409 intervenciones) el 16/01/2019 17:24:04
Por favor envía un fichero de ejemplo para poder ver que es lo que haces y estaría también bien que explicadas por y para que quieres hacer esto.
En principio no parece tener mucho sentido. Si explicas que estas haciendo quizás te podemos aconsejar una solución mejor.

Saludos.
\\//_
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

Copiar y pegar datos en diferentes hojas

Publicado por Jaime (6 intervenciones) el 16/01/2019 19:28:35
Quiero copiar de la hoja concen el rango de celdas
H8:N8 y pegarla en la hoja 1 en el rango G25:D31
H9:N9 y pegarla en la hoja 2 en el rango G25:D31
Y así sucesivamente hasta no encontrar registro le mandé el archivo a su correo
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
Imágen de perfil de Antoni Masana
Val: 1.151
Oro
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Copiar y pegar datos en diferentes hojas

Publicado por Antoni Masana (409 intervenciones) el 17/01/2019 09:38:05
Acabo de responder al correo y no sabía que estaba relacionado con este post.

La cuestión es ¿Porque tienes ciento y pico de hojas iguales? ¿Qué haces con estas hojas? ¿Son para imprimir?

Las hojas que están etiquetadas con un número deben tener una finalidad determinada y creo que una de dos o han de terminar en papel o en un PDF, tanto si se han de tratar una a una o todas a la vez con una sola hoja se puede hacer.

Truco: para imprimir una podría una lista desplegable en la hoja 1 o en la CONCEN para seleccionar el código. En el caso de querer imprimirlas todas una macro iría realizando la operación manual descrita anteriormente con todos los códigos.
También se puede hacer como lo deseas.

Puedes explicarme el porqué de estas 128 hojas.

Por aquí o en mi correo.

Saludos.
\\//_
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

Copiar y pegar datos en diferentes hojas

Publicado por Jaiem (6 intervenciones) el 17/01/2019 14:29:31
Que tal antoni si lo que quiero es copiar los datos de la hoja concen como la numeración que tiene la hoja me lo manda a cada una de las hojas las cuales se imprimen como pueden ser 1 o las 128,

Mi idea es efectivamente crear una macro que me copie de la hoja concen a todas las hojas
Lo tengo por separado porque en ocasiones hago modificaciones acciones en las condiciones

Y las fórmulas se pueden borrar
Pero esa idea de la lista desplegable para imprimir esta correcta
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
Imágen de perfil de Antoni Masana
Val: 1.151
Oro
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Copiar y pegar datos en diferentes hojas

Publicado por Antoni Masana (409 intervenciones) el 18/01/2019 07:18:05
Esta macro te rellena todas las hojas

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Option Explicit
 
Sub Llenar_Fichas()
    Dim a As Integer, Fila As Integer, Hoja As String
 
    Application.ScreenUpdating = False
 
    For a = 1 To 128
        Fila = a + 7
        Hoja = a
        Sheets(Hoja).Range("O15") = Sheets("CONCEN").Range("C" & Fila)
        Sheets(Hoja).Range("F15") = Sheets("CONCEN").Range("D" & Fila)
 
        Sheets(Hoja).Range("G25") = Sheets("CONCEN").Range("H" & Fila)
        Sheets(Hoja).Range("G26") = Sheets("CONCEN").Range("I" & Fila)
        Sheets(Hoja).Range("G27") = Sheets("CONCEN").Range("J" & Fila)
        Sheets(Hoja).Range("G28") = Sheets("CONCEN").Range("K" & Fila)
        Sheets(Hoja).Range("G29") = Sheets("CONCEN").Range("L" & Fila)
        Sheets(Hoja).Range("G30") = Sheets("CONCEN").Range("M" & Fila)
        Sheets(Hoja).Range("G31") = Sheets("CONCEN").Range("N" & Fila)
    Next
 
    Application.ScreenUpdating = True
    MsgBox "Fin de la macro"
End Sub

En la hoja CONCEN en la columna D pondria esta formula:

1
=SI.ERROR(BUSCARV(C8;TRAB!A:B;2;0);"")

Y en la columna V

1
=SI.ERROR(BUSCARV(E8;SALARIO;3;0);"")

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar

Copiar y pegar datos en diferentes hojas

Publicado por Jaime (6 intervenciones) el 19/01/2019 01:11:16
Muchísimas gracias antoni ya lo probé y quedo perfecto muchas gracias otra consulta antoni como le pondría una condición en los formatos en la columna de tolerancia

Por ejemplo
Si en g25 :G31
se pone 4 la tolerancia seria 0:20 ,
5. Se pone 0:40
6 poner 1:00
7 poner 1:20
8 poner 1:40
Porfa y muchas gracias nuevamente
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