Question

请问如何请EXCEL某区域单元格内的内容自动导出为TXT文本呢

Answer 1

这个需要用VBA代码来完成，如下：

Sub test()
Dim rG As Range, wb As Workbook
f = MsgBox("已经选好数据区域了吗？" & Chr(10) & "Yes----选好了。     No------还没有。", vbYesNo, "已经选好数据区域了吗？")
If f = 7 Then Exit Sub
Application.DisplayAlerts = False
Set rG = Selection
Workbooks.Add
With ActiveWorkbook
    rG.Copy .Worksheets(1).Cells(1, 1)
    .SaveAs ThisWorkbook.Path & "\新文件.txt", FileFormat:=xlText
    .Close True
End With
Application.DisplayAlerts = True
MsgBox "处理结束，在生成了一个名为“新文件.txt”的文本文件"
End Sub

附件中有样本文件，以供测试！