Necesito concatenar una serie de celdas
Hola, estoy utilizando el siguiente procedimiento, para copiar los datos de una hoja en otra pero necesito concatenar una serie de seldas que están en la hoja factura y quiero que las pace a la hoja control en una sola celda las celdas que necesito concatenar tienen que ir así C35 Y I35 JUNTAS, ESPACIO, C36 Y I36, ASÍ SUCESIVAMENTE, el resultado me lo tiene que colocar en la columna 5
Sub copiandodatos()
Dim filaUlt As Long
filaUlt = Sheets("CONTROL").Range("A65536").End(xlUp).Row + 1
Sheets("CONTROL").Cells(filaUlt, 1) = Sheets("FACTURA").Range("I10")
Sheets("CONTROL").Cells(filaUlt, 2) = Sheets("FACTURA").Range("B9")
Sheets("CONTROL").Cells(filaUlt, 3) = Sheets("FACTURA").Range("G10")
Sheets("CONTROL").Cells(filaUlt, 4) = Sheets("FACTURA").Range("I48")
Sheets("CONTROL").Cells(filaUlt, 5) =
End Sub
Gracias por la respuesta
Sub copiandodatos()
Dim filaUlt As Long
filaUlt = Sheets("CONTROL").Range("A65536").End(xlUp).Row + 1
Sheets("CONTROL").Cells(filaUlt, 1) = Sheets("FACTURA").Range("I10")
Sheets("CONTROL").Cells(filaUlt, 2) = Sheets("FACTURA").Range("B9")
Sheets("CONTROL").Cells(filaUlt, 3) = Sheets("FACTURA").Range("G10")
Sheets("CONTROL").Cells(filaUlt, 4) = Sheets("FACTURA").Range("I48")
Sheets("CONTROL").Cells(filaUlt, 5) =
End Sub
Gracias por la respuesta
1 respuesta
Respuesta de Elsa Matilde
1