Arreglar o crear una macro en excel para guardar un archivo a txt delimitado por pipelines

$10-30 USD

Ολοκληρώθηκε

Αναρτήθηκε

περίπου 7 χρόνια πριν

$10-30 USD

Πληρωμή κατά την παράδοση

Buen día, Tengo esta macro que me permite guardar un archivo de excel a txt delimitado por pipelines, pero no me guarda las celdas sin datos: Open ruta & "[login to view URL]" For Output As #1 Range("a1").Select Do While [login to view URL](0, 1).Value <> "" ubica = [login to view URL] Do While [login to view URL] < 75 If [login to view URL] <> "" Then lista = lista & "|" & [login to view URL] End If [login to view URL](0, 1).Select Loop lista = Mid(lista, 2, Len(lista) - 1) Print #1, lista lista = "" Range(ubica).Offset(1, 0).Select Loop Close #1 End Sub Adjunto el archivo con la macro con las celdas en blanco resaltadas en naranja, que me deberían quedar como "||" en el txt que genera. Adicionalmente cada línea debería terminar en "|", y debería guardar todas las líneas con datos.

Excel

Programming

Ταυτότητα εργασίας: 13293838

Σχετικά με την εργασία

8 προτάσεις

Απομακρυσμένη Εργασία

Ενεργός/ή 7 χρόνια πριν

Ψάχνεις τρόπο για να κερδίσεις μερικά χρήματα;

Διεύθυνση Email

Πλεονεκτήματα πλειοδοσίας στο Freelancer

Καθόρισε τον προϋπολογισμό σου και το χρονοδιάγραμμα

Πληρώσου για τη δουλειά σου

Περίγραψε την πρόταση σου

Η εγγραφή και η πλειοδοσία σε εργασίες είναι δωρεάν

Βραβεύτηκε στον/στην:

@beltran0404

Buenas tardes, Por favor escribeme para entender un poco mejor lo que requieres. Saludos cordiales, Luis Romero

$15 USD σε 0 ημέρα

5,0

(37 αξιολογήσεις)

4,4

8 freelancers δίνουν μια μέση προσφορά $25 USD για αυτή τη δουλειά

@sajibdigital

Hi I would like to work on your project. I hope you will be fully satisfied after completing this project with me. You may view my profile to know about my expertise. I have 37 review with 5 Star rating. I pray and hope that you will consider me for this job and I will see a messege from you soon. So why you are thinking? Let's discuss about your project................

$17 USD σε 1 ημέρα

5,0

(19 αξιολογήσεις)

4,5

@cracken

Hi Imedicovirtual2, I am competitive to this kind of task, can take good care of this project. In fact, I already done related to this job before. Let me know the best of your time so we can discuss further based on your requirements and we can move forward to the next step. Thanks, Joseph C Ocero

$29 USD σε 1 ημέρα

4,4

(8 αξιολογήσεις)

3,6

@alsanchez65

Hola, Mi nombre es Alonso Sánchez, yo puedo ayudarte en este proyecto. Por favor contactame vía chat para más detalles. Saludos.

$25 USD σε 1 ημέρα

5,0

(1 αξιολόγηση)

0,6

@onietomartinez

Hola, Muy fácil. ¿Quiere que se lo envíe? Adjudíqueme el proyecto. Un saludo y gracias de antemano. Omar Nieto Martínez

$25 USD σε 0 ημέρα

0,0

(0 αξιολογήσεις)

0,0

@ergonzalezl

Desarrollador independiente Senior con más de 20 años de experiencia VB6, ASP.NET, C#, SQL Server, Oracle, MySQL, Excel,Access. He realizado consultoría de proyectos a diferentes empresas en Colombia. Tengo habilidades en desarrollo de Software para aplicaciones interactivas mediante WPF, WCF, WebServices, Web, Winforms. Programación de procedimientos almacenados en SQL Server y MySQL

$25 USD σε 1 ημέρα

0,0

(0 αξιολογήσεις)

0,0

@rmartinezsoler

Entiendo es sencillo de modificar, la única duda es si se debe imprimir hasta la columna 75 o la 57, adjunto salida de demostración: CMAR|281690|NI|892001588|5000100482|EPS003|2||13/12/2015|4110837|0|0|0|0|0|177533||3933304||8|1|||10|5|CC|29569885|MARIA||RUBIO||||||P|38825||UNIDADDECUIDADOSINTERMEDIOSADULTO|||0|0|0|0|0|0|0|R55X||||05/12/2015||15/12/2015|| CMAR|281690|NI|892001588|5000100482|EPS003|2||13/12/2015|4110837|0|0|0|0|0|177533||3933304||8|1|||10|5|CC|29569885|MARIA||RUBIO||||||P|109304||OXIGENOCANULANASALHASTA3LTMINPORHORA|||0|0|0|0|0|0|0|R55X||||05/12/2015||15/12/2015|| CMAR|281690|NI|892001588|5000100482|EPS003|2||13/12/2015|4110837|0|0|0|0|0|177533||3933304||8|1|||10|5|CC|29569885|MARIA||RUBIO||||||P|39113||CUIDADOMANEJOINTRAHOSPITALARIOPORMEDICINAGENERAL|||0|0|0|0|0|0|0|R55X||||05/12/2015||15/12/2015|| ¿Esta sería la salida en TXT deseada?

$30 USD σε 1 ημέρα