1、调用脚本对象
Sub WriteTxt1()
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.CreateTextFile("path\filename", True)
f.WriteLine ("Text Message.")
f.writeline(cells(row,col).value)
f.Close
End Sub
其中,OpenTextFile的用法是:
打开指定的文件并返回一个 TextStream 对象,可以通过这个对象对文件进行读、写或追加。
object.OpenTextFile(filename[, iomode[, create[, format]]])
参数
object
必选项。 object 应为 FileSystemObject 的名称。
filename
必选项。 指明要打开文件的字符串表达式。
iomode
可选项。 可以是三个常数之一: ForReading 、 ForWriting 或 ForAppending 。
create
可选项。 Boolean 值,指明当指定的 filename 不存在时是否创建新文件。 如果创建新文件则值为 True ,如果不创建则为 False 。 如果忽略,则不创建新文件。
format
可选项。 使用三态值中的一个来指明打开文件的格式。 如果忽略,那么文件将以 ASCII 格式打开。
设置
iomode 参数可以是下列设置中的任一种:
常数 |
值 |
描述 |
ForReading |
1 |
以只读方式打开文件。 不能写这个文件。 |
ForWriting |
2 |
以写方式打开文件 |
ForAppending |
8 |
打开文件并从文件末尾开始写。 |
format 参数可以是下列设置中的任一种:
值
|
描述
|
TristateTrue
|
以 Unicode 格式打开文件
|
TristateFalse
|
以 ASCII 格式打开文件
|
TristateUseDefault
|
使用系统默认值打开文件
|
2、Basic语言的标准方法
Sub WriteTxt2()
Open "path\filename" For Output As #1
Write #1, "message1", "message2"
Write #1, cells(row,col).value
Close #1
End Sub
3、使用流(stream),这个方法可以方便地设置Encoding等
Sub WriteToTextFile(FileName, ByVal Text, CharSet)
Dim stream As Object
Set stream = CreateObject("adodb.stream")
stream.Type = 2
stream.Mode = 3
sstream.CharSet = CharSet
stream.Open
stream.WriteText Str
stream.SaveToFile FileName, 2
stream.flush
stream.Close
Set stream = Nothing
End Sub
如果是读文件则使用
LoadFromFile和ReadText
分享到:
相关推荐
在Excel-VBA编程中,操作文件是常见的任务,这涵盖了读取、写入、创建和管理各种类型的文件。本文将详细讲解四大方法,让你更好地掌握如何在VBA中处理文件。 首先,我们可以利用Excel对象来处理文件。Excel对象模型...
在"EXCELVBA方法属性大全.CHM"这个压缩文件中,你应该能找到一个详细的参考指南,包含更多方法和属性,帮助你在实际编程中快速查找和理解。这个资源对于Excel VBA初学者和有经验的开发者都非常有价值,它能够提高你...
在Excel VBA编程中,操作文件是常见的任务,这涵盖了读取、写入、创建、删除等多种操作。本文将详细讲解四种主要的文件操作方法。 首先,利用Excel对象来处理文件是最直观且易于理解的方式。Excel对象模型提供了一...
本API帮助文档专注于通过VBA来操作Excel,是VBA编程学习的重要参考资料。 首先,VBA编程的基础包括了解基本语法和数据类型。在VBA中,变量声明是必要的,你可以使用Dim、Private或Public关键字来定义变量。数据类型...
2. **批量数据导入**:从外部数据库或文本文件中导入大量数据至Excel。 3. **动态图表创建**:根据用户选择的数据范围自动创建和更新图表。 ### 学习资源推荐 1. **官方文档**:Microsoft官网提供了详细的VBA参考...
文件操作也是VBA的重要部分,你可以使用Open、Write、Close等命令读写文本文件,或者导入导出数据到CSV或XML格式。 最后,调试技巧是提升VBA编程效率的关键。学会使用Debug.Print、Breakpoints、Step Into/Over/Out...
本文档旨在通过一系列实战案例,帮助读者深入理解并掌握Excel VBA中的常见操作技巧。这些技巧涵盖了从简单的单元格操作到复杂的工作表管理和工作簿处理等多个方面,非常适合初学者作为入门指南。 #### 第1章:Range...
第11章~第14章主要介绍了如何利用ExcelVBA来操作数据库(包括Excel工作簿、Access数据库、SQLServer数据库和文本文件),尤其是将ExcelVBA与ADO和SQL结合起来,充分发挥利用数据库保存数据和利用Excel计算分析...
**Excel VBA 操作 MySQL** \- **准备工作** 在使用Excel VBA操作MySQL数据库之前,首先需要确保已正确地安装了必要的组件。这包括MySQL服务器、ODBC驱动(myODBC for MySQL)以及具备对ADO对象的支持。以下是安装和...
10-1 导入/导出文本文件 10-2 与Office组件的协作 Chapter 11 打印与页面设置 11-1 打印 11-2 页面设置 Chapter 12 文件及文件夹管理 12-1 文件管理 12-2 文件夹管理 Chapter 13 其他常见...
**在"EXCELVBA.rar_Excel VBA_VBa_excelvba_vba excel"这个压缩包中,包含了一个名为"EXCEL VBA语句集.pdf"的文件,很可能是对Excel VBA常用语句和函数的详细概述。这样的资源对于初学者来说极其宝贵,因为VBA的学习...
TXT文件是一种常见的文本文件格式,通常用于存储纯文本信息。在VBA中,可以使用`OpenTextFile`函数打开TXT文件,然后通过循环读取每一行数据,将其写入到Excel的工作表中。这个过程可能涉及到对数据的预处理,例如...
提供的压缩包文件“批量导入导出文本文件.xls”可能包含一个示例,演示了如何在VBA中实现这个功能。你可以打开这个工作簿,查看其VBA模块(VBE - Visual Basic Editor)中的代码,学习并参考其实现方式。 总的来说...
通过"EXCEL_VBA常用代码实战大全.doc"文档,你可以逐步学习并实践这些知识点,每个实例都将提供一个具体的应用场景,帮助你更好地理解和运用VBA。在实践中不断积累,你将能够解决各种复杂的Excel自动化问题,大大...
在Excel中使用VBA(Visual Basic for Applications)与Access数据库进行交互是一种常见的数据处理方法,尤其是在需要高效查询和处理大量数据时。标题“EXCEL-time.rar_Excel VBA_excel vba access_excel+vba+access_...
"Excel-VBA宏编程实例源代码-文本与图形的操作-产品信息反馈1.zip"这个文件包含了一些关于如何使用VBA进行文本处理和图形操作的实例源代码,这对于理解和学习VBA编程,特别是针对产品信息反馈的处理,非常有帮助。...
在Excel VBA(Visual Basic for Applications)编程中,与外部文件进行交互是常见的需求,这有助于扩展Excel的功能,实现自动化处理、数据导入导出等多种任务。本资源"Excel-VBA-file.rar_Excel VBA"主要介绍了四种...