Como modifico datos en archivo de texto usado como base de datos con vba en excel 2007.
tengo un libro en excel 2007 el cual esta conectado a una base de datos creada en un archivo de texto, utilizo como separador ";" con vba cree una macro que me trae los datos a una planilla. Lo que necesito es guardar los cambios que hago en esa planilla en el archivo utilizado como base de datos. Desde ya muchas gracias por tu colaboración.
1 Respuesta
Te dejo un ejemplo que "exporta" el rango seleccionado a un txt
Lo puedes adaptar:
Public Sub exporta_txt()
' exporta rango selecionado a archivo txt
Dim obj_FSO As Object
Dim Archivo As Object
Dim rango As Range
Dim r As Range
Dim Nombre As String
Dim filas As Long
'4c7569735f50
Nombre = InputBox("indica nombre de archivo", "Exportando datos", "C:\Archivo.txt")
If Len(Nombre) = 0 Then Exit Sub
Set obj_FSO = CreateObject("Scripting.FileSystemObject")
Set Archivo = obj_FSO.CreateTextFile(Nombre, True)
filas = Selection.Rows.Count
Set rango = Selection
For Each r In rango
If Len(r) > 0 Then Archivo.writeline Trim(r)
Next
Archivo.Close
Set obj_FSO = Nothing
Set Archivo = Nothing
Set r = Nothing
Set rango = Nothing
MsgBox "Exportado a : " & Nombre, vbInformation
End Sub
