Excel - Evitar el Carriage return al realizar Print en fichero

 
Vista:

Evitar el Carriage return al realizar Print en fichero

Publicado por Erickinhu (1 intervención) el 31/05/2012 17:57:44
Hola,

necesito crear un fichero de texto con una macro de Excel con VBA. Quiero que al final de cada línea exista un linefeed (LF) y ya está. Utilizo el Print y siempre me pone un CR al final del fichero.

No quiero que al final del fichero me ponga un Carriagre Return (CR).

Mi código es:

n = FreeFile
Open NombreArchivo For Output As #n

For i = 0 To UBound(Salida) - 1

strFichero = strFichero + Salida(i) + vbLf

Next

Print #n, strFichero

¿¿¿Alguna idea???
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: 4.908
Oro
Ha mantenido su posición en Excel (en relación al último mes)
Gráfica de Excel

Evitar el Carriage return al realizar Print en fichero

Publicado por Antoni Masana (2474 intervenciones) el 06/06/2012 08:40:11
Añadir un ; al final de la línea del print:

1
2
3
4
5
6
7
8
n = FreeFile
Open NombreArchivo For Output As #n
 
For i = 0 To UBound(Salida) - 1
    strFichero = strFichero + Salida(i) + vbLf
Next
 
Print #n, strFichero ;
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