求将EXCEL中选定一列数据导出至文本文件中的VBA代码

heukevin

我现在想要将Excel中的一列数据（如从B1至B50）按照原序导出到一个.txt或.js的文件中，请问VBA代码该怎么写啊？请求各位指点，谢谢啦！

xcrapch

笨办法送你一个，供参考
Private Sub CommandButton2_Click()
Reset
Dim i As Integer
Open "D:/TEST.txt" For Append As #1
For i = 1 To 50
   Print #1, Me.Cells(i, 2) ' 将字符串写入文件。
Next i
Reset
End Sub

heukevin

xcrapch 发表于 2015-3-18 20:31
笨办法送你一个，供参考
Private Sub CommandButton2_Click()
Reset

刚开始接触VBA，我先研究一下，非常感谢啦！