精华内容
下载资源
问答
  • WORDVBA教程

    2013-03-23 19:26:24
    WORDVBA教程,是一本非常详细的有关vb如何操作word的联机帮助文件.
  • word vba教程

    2013-10-16 09:14:31
    word vba教程,来自网络,讲述vba编程的比较入门的教程,内容比较简单,共27页。
  • word VBA教程

    2014-11-13 16:44:04
    VBA的基本使用,入门级教程。适用于学过一点VB的用户。
  • 【免费下载】ExcelVBA和WordVBA教程.rar
  • WORDVBA教程完全汉化

    2009-09-20 11:41:02
    学习VBA的好资料,PDF格式,分章节讲述,详细极了。。。。。。。。
  • Word VBA教程:Close方法

    千次阅读 2015-05-08 14:03:04
    VBA示例 当应用于 Document对象时。 本示例在关闭活动文档前提示用户保存该文档。如果用户单击“取消”,则捕获错误 4198(命令失败)并显示一条信息。 On Error GoTo errorHandlerActiveDocument.Close _ ...
    应用于 Document 和 Documents对象的 Close方法。 
    

    关闭指定的一个或多个文档。

    expression.Close(SaveChanges, OriginalFormat, RouteDocument)

    expression   必需。该表达式返回以上的一个对象。

    SaveChanges  Variant 类型,可选。指定保存文档的操作。可以是下列 WdSaveOptions 常量之一:wdDoNotSaveChanges、wdPromptToSaveChanges 或 wdSaveChanges。

    OriginalFormat  Variant 类型,可选。指定保存文档的格式。可以是下列 WdOriginalFormat 常量之一:wdOriginalDocumentFormat、wdPromptUser 或 wdWordDocument。

    RouteDocument  Variant 类型,可选。如果该属性值为 True,则将文档发送给下一个收件人。如果文档没有附加传送名单,则忽略该参数。

    应用于 MailMergeDataSource、Pane 和 Task对象的 Close方法。

    关闭指定的邮件合并数据源、窗格或任务。

    expression.Close

    expression   必需。该表达式返回以上的一个对象。

    应用于 Window对象的 Close方法。

    关闭指定的窗口。

    expression.Close(SaveChanges, RouteDocument)

    expression   必需。该表达式返回以上的一个对象。

    SaveChanges  Variant 类型,可选。指定保存文档的操作。可以是下列 WdSaveOptions 常量之一:wdDoNotSaveChanges、wdPromptToSaveChanges 或 wdSaveChanges。

    RouteDocument  Variant 类型,可选。如果该属性值为 True,则将文档发送给下一个收件人。如果文档没有附加传送名单,则忽略该参数。

    VBA示例

    当应用于 Document对象时。

    本示例在关闭活动文档前提示用户保存该文档。如果用户单击“取消”,则捕获错误 4198(命令失败)并显示一条信息。

    On Error GoTo errorHandlerActiveDocument.Close _    SaveChanges:=wdPromptToSaveChanges, _    OriginalFormat:=wdPromptUsererrorHandler:If Err = 4198 Then MsgBox "Document was not closed"

    当应用于 Pane对象时。

    本示例在拆分活动窗口时关闭活动窗格。

    If ActiveDocument.ActiveWindow.Panes.Count >= 2 Then _    ActiveDocument.ActiveWindow.ActivePane.Close

    当应用于 Task对象时。

    本示例先激活 Microsoft Excel,然后将其关闭。

    For Each myTask In Tasks    If InStr(myTask.Name, "Microsoft Excel") > 0 Then        myTask.Activate        myTask.Close    End IfNext myTask

    当应用于 Window对象时。

    本示例关闭活动文档的活动窗口并保存文档。

    ActiveDocument.ActiveWindow.Close SaveChanges:=wdSaveChanges
    展开全文
  • Word VBA教程:查找并替换文字或格式

    万次阅读 2018-08-18 10:48:54
    通过Find 和Replacement对象可实现查找和替换功能。Selection 和Range对象可以使用 Find对象。从 Selection 或 Range对象访问 Find对象时,查找操作会略有不同。 查找并选定文字 如果从 Selection对象访问 Find...

    通过Find 和Replacement对象可实现查找和替换功能。Selection 和Range对象可以使用 Find对象。从 Selection 或 Range对象访问 Find对象时,查找操作会略有不同。

    查找并选定文字

    如果从 Selection对象访问 Find对象,当找到搜索条件时,就会更改所选内容。下列示例选定下一个出现的“Hello”。如果到达文档结尾时仍未找到“Hello”,则停止搜索。

     

    With Selection.Find

        .Forward = True

        .Wrap = wdFindStop

        .Text = "Hello"

        .Execute

    End With

    Find对象包含与“查找和替换”对话框中的选项相关的属性(在“编辑”菜单上选择“查找”可显示该对话框)。可以设置 Find对象单独的属性或使用Execute方法的参数,如下例所示。

     

    Selection.Find.Execute FindText:="Hello", _

        Forward:=True, Wrap:=wdFindStop

    查找文字,但不更改所选内容

    如果从 Range对象访问 Find对象,则找到搜索条件时,不更改所选内容,但是会重新定义 Range对象。下列示例在活动文档中查找第一个出现的“blue”。如果找到该单词,则重新定义该区域,并将加粗格式应用于单词“blue”。

     

    With ActiveDocument.Content.Find

        .Text = "blue"

        .Forward = True

        .Execute

        If .Found = True Then .Parent.Bold = True

    End With

    下列示例使用 Execute方法的参数,执行结果与上例相同。

     

    Set myRange = ActiveDocument.Content

    myRange.Find.Execute FindText:="blue", Forward:=True

    If myRange.Find.Found = True Then myRange.Bold = True

    使用 Replacement对象

    Replacement对象代表查找和替换操作的替换条件。Replacement对象的属性和方法对应于“查找和替换”对话框中的选项(单击“编辑”菜单中的“查找”或“替换”命令可显示该对话框)。

    可通过 Find对象使用 Replacement对象。下列示例将所有单词“hi”替换为“hello”。由于 Find对象是通过 Selection对象访问的,所以当找到搜索条件时,会更改所选内容。

     

    With Selection.Find

        .ClearFormatting

        .Text = "hi"

        .Replacement.ClearFormatting

        .Replacement.Text = "hello"

        .Execute Replace:=wdReplaceAll, Forward:=True, _

            Wrap:=wdFindContinue

    End With

    下列示例取消活动文档中的加粗格式。Find对象的Bold属性为 True,而 Replacement对象的该属性为 False。若要查找并替换格式,可将查找和替换文字设为空字符串 (""),并将 Execute方法的 Format参数设为 True。由于从 Range对象访问 Find对象,所选内容将保持不变(Content属性返回一个 Range对象)。

     

    With ActiveDocument.Content.Find

        .ClearFormatting

        .Font.Bold = True

        With .Replacement

            .ClearFormatting

            .Font.Bold = False

        End With

        .Execute FindText:="", ReplaceWith:="", _

            Format:=True, Replace:=wdReplaceAll

    End With

     

    展开全文
  • 多种对象多种对象该集合代表画布上的图形。使用 CanvasShapes集合使用Shape 或ShapeRange对象的CanvasItems属性可返回一个 CanvasShapes集合。若要在画布上添加图形,可使用 CanvasShapes集合的下列方法:AddCallout...

    多种对象

    多种对象

    该集合代表画布上的图形。

    使用 CanvasShapes集合

    使用Shape 或ShapeRange对象的CanvasItems属性可返回一个 CanvasShapes集合。若要在画布上添加图形,可使用 CanvasShapes集合的下列方法:AddCallout、AddConnector、AddCurve、AddLabel、AddLine、AddPicture、AddPolyline、AddShape、AddTextbox、AddTextEffect 或BuildFreeForm。下列示例在活动文档中添加画布,然后在画布上添加三个图形。

    Sub AddCanvasShapes()

    Dim shpCanvas As Shape

    Dim shpCanvasShapes As CanvasShapes

    Dim shpCnvItem As Shape

    'Adds a new canvas to the document

    Set shpCanvas = ActiveDocument.Shapes _

    .AddCanvas(Left:=100, Top:=75, _

    Width:=50, Height:=75)

    Set shpCanvasShapes = shpCanvas.CanvasItems

    'Adds shapes to the CanvasShapes collection

    With shpCanvasShapes

    .AddShape Type:=msoShapeRectangle, _

    Left:=0, Top:=0, Width:=50, Height:=50

    .AddShape Type:=msoShapeOval, _

    Left:=5, Top:=5, Width:=40, Height:=40

    .AddShape Type:=msoShapeIsoscelesTriangle, _

    Left:=0, Top:=25, Width:=50, Height:=50

    End With

    End Sub

    使用CanvasItems(index) 可返回 CanvasShapes集合中单独的图形,其中 index 为名称或索引序号。下列示例设置Line 和Fill属性,并垂直翻转画布中的第三个图形。

    Sub CanvasShapeThree()

    With ActiveDocument.Shapes(1).CanvasItems(3)

    .Line.ForeColor.RGB = RGB(50, 0, 255)

    .Fill.ForeColor.RGB = RGB(50, 0, 255)

    .Flip msoFlipVertical

    End With

    End Sub

    创建图形时将为其指定默认的名称。例如,如果在文档中添加三个不同的图形,他们可能分别命名为“矩形 2”、“文本框 3”和“椭圆 4”。若要引用图形的默认名称或为其指定一个更有意义的名称,请使用Name属性。

    展开全文
  • Word VBA 基础教程

    2011-11-09 21:09:19
    学习Word VBA的基础教程,简单易学。
  • word vba 参考教程

    千次阅读 2012-01-19 14:24:04
  • WORD VBA则是将VB应用于Word对象模型,或者说是用VB语言来操控这些Word对象模型,以达到各种应用的要求。所以,如果你想通过VBA控制Word,必须同时熟悉VB语言和Word对象模型。    系统讲解关于Word中,VBA...
  • Word VBA 实现办公自动化排版教程
  • excel和wordVBA教程

    2010-05-08 21:59:54
    我自己从几个地方下载后合成的pdf文档,关键是 内容都可以直接copy出来复制到word或ppt里的, 所以很适合做为老师做课件的基础资料,不用 打字了。。。内容包括excel和word VBA 358页。
  • 资源虽然排版不太美观,但是绝对是精品内容。
  • office宏教程 office vba教程

    热门讨论 2010-09-02 07:12:49
    office宏教程 office vba教程 word excel powerpoint
  • Word VBA高效排版范例应用》的实例文件
  • Word2003使用VBA教程

    2014-08-08 10:41:00
    注:本文中所有vba代码都是储存在doc中,而非normal.dot 1.打开一个.doc文档 2.按ALT+F11 3.左侧 Project-插入-模块 4.输入自己的代码,一定要是函数的形式 例如输入如下代码: Sub ...
  • VBAWord参考教程

    千次阅读 2015-05-21 09:32:44
    下面是VBAWord参考教程的链接: http://www.feiesoft.com/vba/word/ ※:内容很全面非常,讲解非常详细
  • Word VBA绘制图形-1

    2020-03-09 03:53:29
    非编程科班人士(有机专业),仅仅是喜欢喜欢代码,10年的MS Office疯狂热爱者...突然看到一个关于MS Word VBA绘制图形的视频教程。甚是有趣,随即照葫芦画瓢,边学边做,最终实现了最终目标。现代码分享如下,以飨...
  • vb vba api 教程 excel access word
  • VBA教程

    2008-03-24 16:04:00
    VBA教程 VBA教程 1.1 VBA是什么 直到90年代早期,使应用程序自动化还是充满挑战性的领域.对每个需要自动化的应用程序,人们不得不学习一种不同的自动化语言.例如:可以用EXCEL的宏语言来使EXCEL自动化,使用WORD...
  • VBA(Visual Basic for Application): ... VBA 简明教程 Office VBA编程手册合集大全 (CHM) Microsoft Office VBA 语言参考 Microsoft Office 2007 System VBA 编程 Office VBA 编程高手 VBA 傻瓜书 第五版 Excel VBA...
  • 面向 Microsoft Word 开发人员,包括对象、属性、事件、方法等内容
  • Excel_VBA教程

    2014-09-22 11:36:34
    一、VBA语言基础 1 第一节 标识符 1 第二节 运算符 1 第三节 数据类型 1 第四节 变量与常量 1 第五节 数组 2 第六节 注释和赋值语句 2 第七节 书写规范 2 第八节 判断语句 2 第九节 循环语句 3 第十节 其他类语句和...
  • office vba教程中文帮助手册chm,精选word excel ppt vbs这四个最主要的文件,是目前可以获取到的中文版CHM,非常适合学习,以及作为参考工具
  • VBA编程多个例子,适合初学者进行系统学习,如果好评的话,后面会继续上传更多资源,希望大家多多支持,有需要资源的可以私信我

空空如也

空空如也

1 2 3 4 5 ... 20
收藏数 986
精华内容 394
关键字:

wordvba教程