cuantas veces hemos querido que nuestros datos de una hoja excel se genere en un formato txt y ademas este delimitado por el famosisimo "|" o cualquier otro caracter que en su caso necesitemos aqui pongo una solucion a esto espero a alguien le pueda servir ya que eh obtenido cosas muy buenas de este foro .... saludos Sub CREARTXTDELIMITADO() ANTERIORES Application.ScreenUpdating = False Dim Archivo As String, Delimitador As String, A_num As Integer, _ Fila As Long, Fila1 As Long, Filan As Long, _ Col As Integer, Col1 As Integer, Coln As Integer, _ Linea As String, Celda As String Dim Nombrehoja As String Nombrehoja = ThisWorkbook.Name 'aqui ponemos donde queremos que se genere Archivo = "C:\" & Nombrehoja & ".txt" Delimitador = "|" On Error GoTo Salida: A_num = FreeFile With ActiveSheet.UsedRange Fila1 = .Cells(1).Row Col1 = .Cells(1).Column Filan = .Cells(.Cells.Count).Row Coln = .Cells(.Cells.Count).Column End With Open Archivo For Output Access Write As #A_num For Fila = Fila1 To Filan Linea = "" For Col = Col1 To Coln If Cells(Fila, Col).Value <> "" _ Then Celda = Application.Text(Cells(Fila, Col), Cells(Fila, Col).NumberFormat) _ Else Celda = "" Linea = Linea & Celda & Delimitador Next Linea = String(1, Delimitador) & Left(Linea, Len(Linea) - Len(Delimitador)) & String(1, Delimitador) Print #A_num, Linea Next Salida: On Error GoTo 0 Close #A_num End Sub

Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis Ingresar

JavaScript está desactivado. Para una mejor experiencia, por favor active JavaScript en su navegador antes de continuar.

crear txt delimitado por pipes o cualquier caracter

Autor del tema elcibernauta08
Fecha de inicio 6 May 2011

elcibernauta08

New member

6 May 2011

cuantas veces hemos querido que nuestros datos de una hoja excel se genere en un formato txt y ademas este delimitado por el famosisimo "|" o cualquier otro caracter que en su caso necesitemos...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

Iniciar sesión o registrarme para responder aquí.

Temas similares

Resuelto

Crear varios archivos .txt a partir de una pestaña de excel

Respuestas: 9

4 Ago 2022

star022

Resuelto

Crear carpeta y guardar archivo txt.

Respuestas: 6

7 Jul 2021

Inocente

Pregunta

Crear varios archivos .TXT desde un archivo excel

Respuestas: 2

20 Abr 2021

jmgc2020

Pregunta

crear dos veces txt

Respuestas: 4

28 Oct 2020

EDGAR IVAN

Pregunta

vba crear excel desde txt mismo formato, distinto tamaño campos

Respuestas: 10

2 Mar 2020

Cacho R

Pregunta

Crear Archivo txt sin informacion

Respuestas: 7

23 Jun 2016

JameL

Pregunta

crear un archivo txt

Respuestas: 12

15 Jun 2013

HBanchieri

Pregunta

Macro para crear TXT desde EXCEL

Respuestas: 4

18 Feb 2011

SYNAPSE

Pregunta

Crear archivo de texto (.txt)

Respuestas: 2

10 Sep 2007

yijo

Pregunta

Ayuda, necesito crear una tabla de registro

Respuestas: 4

27 Abr 2026

JSD

Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Correo electrónico Enlace

Bienvenido a nuestro foro Excel 👋

Tenemos 135.000 usuarios registrados,
y 240.000 preguntas y respuestas Excel.

Primero 👉 regístrate gratis aquí 👈
para ver contenidos y descargas
sin restricciones!

Este sitio usa cookies para ayudar a personalizar el contenido, adaptar su experiencia y mantenerlo conectado si se registra.
Al continuar usando este sitio, usted está consintiendo nuestro uso de cookies.

Aceptar Saber más…

Volver

Arriba