Guardar a txt delimitado por tabulaciones o por comas
Tengo este código lo que hace es guardar un archivo que se está generando desde excel a txt, lo que necesito es que se guarde con formato delimitado por tabulaciones o bien por comas.
De antemano muchas gracias
Function GetFileName2() As String
Dim lRes
lRes = Application.GetSaveAsFilename(".txt", "Archivos de Texto ,*.txt", , "", "Exportar")
If lRes = False Then
GetFileName2 = "Cancel"
Else
kfn = RemovePath(lRes)
If UCase(Dir(lRes)) = kfn Then
If MsgBox("El archivo ya existe, desea reemplazarlo?", vbQuestion + vbYesNo, ")") = vbYes Then
Kill lRes
GetFileName2 = lRes
Else
GetFileName2 = "Cancel"
End If
Else
GetFileName2 = lRes
End If
End If
End Function
1 respuesta
Respuesta de Tor Cheer
1