Jump to content

martincosme

Members
  • Posts

    3
  • Joined

  • Last visited

  • Country

    Mexico

Everything posted by martincosme

  1. Hola a todos: ¿como podría concatenar la columna C y D de la siguiente macro de la cual su autor es Antoni, y que me la pegue en la hoja2 columna D? Muchas gracias por su tiempo y su apoyo. Bendiciones. Sub Copiar() Application.ScreenUpdating = False Set H1 = Sheets("ORIGEN") Set H2 = Sheets("DESTINO") H2.Range("A1:Z50000").ClearContents H2.Range("A1:Z50000").ClearFormats fila = H2.Range("A" & Rows.Count).End(xlUp).Row '+ 1 'Range("A" & fila) = "Albaranes" fila = fila '+ 1 ufila = H1.Range("A" & Rows.Count).End(xlUp).Row H1.Range("B1:B" & ufila).Copy: H2.Range("A" & fila).PasteSpecial 'xlValues H1.Range("C1:C" & ufila).Copy: QUE SE CONCATENE CON LA COLUMNA E Y LA PEGUE EN LA HOJA 2 COLUMNA D H1.Range("E1:E" & ufila).Copy: H2.Range("D" & fila).PasteSpecial 'xlValues End Sub
  2. Perfecto. Si es lo que necesita. Le agradezco Mucho mi estimado isidrod. Gracias.
  3. Buenos días, solicito su apoyo para pasar los datos de la columna A y B a txt, con el ancho fijo a una sola columna, con 2 decimales y a partir de la fila 3 Y la columna C enseguida de los datos en txt, igual con ancho fijo. En total de columnas a txt serian 2 Seria asi: COLUMNA A COLUMNA B COLUMNA C ANCHO FIJO 20 ANCHO FIJO 2 COMO DEBE DE QUEDAR EN TXT Costo Costo con 2 decimales 32.20 SI 32.20 SI 22.25 NO 22.25 NO 28.33 SI 28.33 SI 29.00 NO 29.00 NO 23.00 NO 23.00 NO 8.00 NO 8.00 NO 22.05 NO 22.05 NO 28.00 SI 28.00 SI 29.55 NO 29.55 NO Anexo archivo. Muchas gracias de antemano. Saludos Pasar a TXT con ancho fijo.xls
×
×
  • Create New...

Important Information

Privacy Policy