Facebook Twitter Gplus Flickr Pinterest LinkedIn YouTube RSS
Home Excel vba Escribir datos en un archivo de texto desde Excel con vba
formats

Escribir datos en un archivo de texto desde Excel con vba

Expongo un pequeño ejemplo sobre cómo escribir datos desde Excel a un archivo de Texto.

El usuario podrá utilizar es libre de utilizar For, Do Loop, While, etc.

Sub EscribirEnArchivoTxt()
Open "c:datatextfile.txt" For Output As #1
Print #1, ActiveSheet.Range("A1").Value
Print #1, ActiveSheet.Range("A2").Value
Print #1, ActiveSheet.Range("A3").Value
Close #1
End Sub
 
 Share on Facebook Share on Twitter Share on Reddit Share on LinkedIn
8 Comments  comments 
  • http://gravatar.com/gersonpineda12 gersonpineda12

    Muy bueno!

    Saludos

    • sergioacamposh

      Espero que les sea de utilidad.

  • Rogers Cordova

    Necesito compiar un rango o una seleccion de celdas, lo puedo hacer en bloque (en conjunto) o solo puedo uno por uno? mil gracias que buen Blog

    • sergioacamposh

      Debe ser lìnea por lìnea, para que se vaya capturando en el txt. Pero igual para eso puedes usar un For Next.

  • http://gravatar.com/memofe memofe

    QUE BUEN TUTO!!!
    sencillo y conciso…
    Muchas gracias ahora a implementar con un for each y ya!!!!

    • http://about.me/sergioacamposh sergioacamposh

      Así es.

  • Guest

    ¿Dónde se guarda?

    • sergioacamposh

      En la siguiente línea se muestra la ruta donde quedaría el TXT.

      Open “c:datatextfile.txt” For Output As #1

Sistema Wordpress corriendo bajo... Windows Server 2008 R2
Follow

Get every new post delivered to your Inbox

Join other followers