在EXCEL中通过宏VB编程实现导出EXCEL中的内容到txt文件:
1. Office 2007中新建/打开一个Excel文件,命名为book1.xls,注意后缀,并且填充数据
2. 点击 视图 > 宏 > 录制宏 > 停止宏 > 查看宏 >编辑宏(写VB代码) >保存
Sub Macro1() Dim objApp As Object Dim objWbk As Object Dim objSht As Object Dim i&, strTemp$, strWorkBook$ '工作簿文件名你自己处理 strWorkBook = "D:\VB\book1.xls" Set objApp = CreateObject("Excel.Application") Set objWbk