¿Cómo crear un archivo de texto usando Macro en MS Office?

I have word document. I want to create a text file when opening this document. How can i create text file using macro?

preguntado el 31 de julio de 12 a las 13:07

1 Respuestas

Try this. You can create the text file in Document_Open() evento

Private Sub Document_Open()
    Dim filesize As Integer
    Dim FlName As String

    FlName = "C:\Sample.Txt"

    '~~> get a free file handle
    filesize = FreeFile()

    '~~> Open your file
    Open FlName For Output As #filesize

    '~~> Export Text
    Print #filesize, "Hello World"
    Close #filesize
End Sub

Respondido 31 Jul 12, 14:07

No es la respuesta que estás buscando? Examinar otras preguntas etiquetadas or haz tu propia pregunta.