💼txt转word vbscript💻

在日常办公中，我们常会遇到需要将`.txt`文件转换为`.doc`格式的需求。如果你不想下载复杂的软件，用VBScript就能轻松实现！🌟今天就来分享一个简单的小技巧，让你快速搞定这项任务。

首先，准备好你的`.txt`文件，确保它位于容易访问的位置。然后打开记事本，输入以下VBScript代码：

```vbscript

Set objArgs = WScript.Arguments

Set objFSO = CreateObject("Scripting.FileSystemObject")

Set objFile = objFSO.OpenTextFile(objArgs(0), 1)

strText = objFile.ReadAll

objFile.Close

Set objWord = CreateObject("Word.Application")

objWord.Visible = False

Set objDoc = objWord.Documents.Add()

objDoc.Content.Text = strText

objDoc.SaveAs objArgs(1) & ".doc"

objWord.Quit

```

保存文件后，将其命名为`txt_to_word.vbs`。运行时只需拖动`.txt`文件到脚本上，并指定保存路径即可完成转换！✅

这个方法不仅高效，还能节省存储空间，非常适合处理大量文档。💡快试试吧，让繁琐的工作变得简单又有趣！🎉