vba 另存文件如何设置默认路径?
在EXcel的VB编辑器中插入一个模块,输入如下代码试试看。
Sub ExcelToWord() Dim WordObject As Object '声明一个对象变量,这里即将声明为Word对象 On Error Resume Next Set WordObject = CreateObject("Word.Application") '用set来创建Word对象,这里是运行Word程序,但未新建文档 WordObject.Visible = 0 '后台运行Word对象,只在任务管理器中存在WinWord.exe进程,但在任务栏上看不到word;如果为1或者True则可以看到word运行界面 WordObject.Documents.Add DocumentType:=wdNewBlankDocument '新建一word文档 '以下为获取Excel表格中的内容,准备把数据传送给Word,可以根据自己的实际需要定制代码,这里只是示例代码 Excel.Application.Sheets(1).Activate '切换当前电子表格的表1为当前激活表 Excel.Application.Sheets(1).UsedRange.Select '选中当前激活表的所有数据 Selection.Copy '将选中的区域进行复制 WordObject.Application.Activate '将后台运行的Word激活为当前窗口 WordObject.ActiveWindow.Selection.Paste '将刚才从Excel中复制进剪贴板中的内容粘贴进word中来 WordObject.Saved = True '将保存文档的Saved属性设置为True,这样后台运行的Word在保存文档时就不会弹出是否保存的对话框了,达到悄无声息的效果 WordObject.ActiveDocument.SaveAs "D:\temp\导出数据.doc" '调用saveas命令保存文档,根据实际,指定文档的保存路径和名称 WordObject.Application.Quit '退出并关闭程序文档 Set WordObject = Nothing '释放对象End Sub...
用vba打开word模板并修改后保存
这就是你刚辛苦打的文件了(注意:\Documents and Settings\\"显示所有文件和文件夹),再把副档名改为XXX?找回死机后未储存的Word所以重开机时只要到上述的地方 ,找个档名为XXX;Application Data\Microsoft\Word ,找到未保存,突然断电;Administrator\.asd 之类的.doc ,就可以找到刚刚辛苦打的文件了:以上的XXX.asp的文档 都是隐藏的,需要开启在工具→文件夹选项→查看中的\\当电脑突然死机或断电时,Word中来不及存档的档案,他会暂时存放在C...
word默认的保存路径在哪
word默认的保存路径在:C:\Users\Administrator\Documents\以word2010为例,查看文件默认保存路径,具体操作如下:1、打开word,点击【文件】选项下的【选项】;2、在word选项中,点开【保存】,就可以查看文件默认保存位置了;3、点击后面的【浏览】,可以修改文件默认保存位置,点击确定即可。
VBA,将WORD的一段文字自动保存为RTF文件
Sub 宏2()'' 宏2 宏''Selection.CopyDocuments.Add Template:="Normal", NewTemplate:=False, DocumentType:=0Selection.PasteAndFormat (wdPasteDefault)Selection.WholeStorySelection.CopyFName = Mid(Selection.Text, 1, 5) & ".doc"ActiveDocument.SaveAs2 FileName:=FName, FileFormat:=wdFormatRTF, _LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _False, CompatibilityMode:=0ActiveWindow.CloseEnd Sub在执行宏之前要选中一段文字。
默认的文件名是前5个字,保存的位置是我的文档,如果不行的话,可以搜索*.rtf。
在线交流。
转载请注明出处51数据库 » vba 程序 word保存文件路径