Word、Excel之宏应用问答.docx

Word、Excel之宏应用问答.docx

ID:50365408

大小:34.29 KB

页数:7页

时间:2020-03-08

Word、Excel之宏应用问答.docx_第1页
Word、Excel之宏应用问答.docx_第2页
Word、Excel之宏应用问答.docx_第3页
Word、Excel之宏应用问答.docx_第4页
Word、Excel之宏应用问答.docx_第5页
资源描述:

《Word、Excel之宏应用问答.docx》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、QQ:有没有办法得到一个excle表的行的总数和列的总数??AA:xlSheet.UsedRange.Rows.CountxlSheet.UsedRange.Cols.CountQQ:如何打开一个word的模板!最近做一个word的模板程序,打开word是SetNewDoc=MyWord.Documents.Add这是一个新的doc,名字叫文档1(后面会累加,自动的),但是现在我希望直接新建打开一个我写好的模板程序,名字还是叫文档1。请问应该怎么写!AA:OnErrorResumeNext'忽略错误SetWrd=GetObject(,"Word.Applicat

2、ion")'查找一个正在运行的Word拷贝IfErr.Number<>0Then'如果Word没有运行则SetWrd=CreateObject("Word.Application")'运行它EndIfErr.Clear'清除发生错误的Err对象OnErrorGoTo0'保留普通错误进程DimdotAsStringDimdocAsStringWrd.Visible=truedot="C:temp.dot"doc="c:temp.doc"Documents.OpenFileName:=dot,_ConfirmConversions:=False,ReadOnly

3、:=True,AddToRecentFiles:=False,_PasswordDocument:="",PasswordTemplate:="",Revert:=False,_WritePasswordDocument:="",WritePasswordTemplate:="",Format:=_0Wrd.ActiveDocument.CloseWrd.Documents.AddTemplate:=dot,NewTemplate:=False'结果系列操作ActiveDocument.SaveAsFileName:=doc,FileFormat:=wdForm

4、atDocument,_LockComments:=False,Password:="",AddToRecentFiles:=True,WritePassword_:="",ReadOnlyRecommended:=False,EmbedTrueTypeFonts:=False,_SaveNativePictureFormat:=False,SaveFormsData:=False,SaveAsAOCELetter:=_False'打印出来ActiveDocument.PrintOutFileName:=doc,Range:=wdPrintAllDocument

5、,Item:=_wdPrintDocumentContent,Copies:=1,Pages:="",PageType:=wdPrintAllPages,_ManualDuplexPrint:=False,Collate:=True,Background:=True,PrintToFile:=_False,PrintZoomColumn:=0,PrintZoomRow:=0,PrintZoomPaperWidth:=0,_PrintZoomPaperHeight:=0Wrd.ActiveDocument.CloseWORD中打字Selection.TypeTex

6、tText:="您好,先生"如何让Word的保存命令调用我自己编写的保存方法?在doc文档被修改以后,在退出的时候当提示用户文档已经修改,问是否保存和直接点击保存按钮的时候,能否让Word去调用我自己编写的SaveDoc方法,如何实现?创建名为“FileSave”的宏,把你的代码写入在这个宏中。当点击“保存”按钮或退出程序要求“保存”时,都会直接执行你的“FileSave”宏,而不再执行Word的内置命令。怎么样判断Word文档中有没有图片?Word里的图片包括两种(据我所知),楼上的漏掉了InlineShapesIfActiveDocument.Shapes.

7、Count+ActiveDocument.InlineShapes.Count>0ThenMsgBox"esit"ElseMsgBox"Documentdoesn'tcontainashape"EndIfQQ:怎样在程序中把图片写入到word中。AA:功能是:在指定位置插入图片并设置图片的格式(包括设置为衬托于文字下    方)Sub设置图片格式()Selection.InlineShapes.AddPictureFileName:="D:Mypicture800x600.jpg",_LinkToFile:=False,SaveWithDocument:=T

8、rueSelection

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。