Word宏与VBA/VB

最新推荐文章于 2025-06-15 11:09:42 发布

hxxjxw

最新推荐文章于 2025-06-15 11:09:42 发布

阅读量2.9k

点赞数 3

CC 4.0 BY-SA版权

分类专栏： Word宏 VB 文章标签： Word宏 VB

本文链接：https://blog.youkuaiyun.com/hxxjxw/article/details/89499303

Word宏同时被 2 个专栏收录

2 篇文章

订阅专栏

1 篇文章

订阅专栏

本文介绍了Visual Basic（VB）和Visual Basic for Applications（VBA）的基础知识，包括两者之间的区别，基本语句和函数的使用，以及在Microsoft Office中的应用实例，如Word宏的编写来修改图片大小、添加行号等。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

1、 Visual Basic（简称VB）是Microsoft公司开发的一种通用的基于对象的程序设计语言。是一种可用于微软自家产品开发的语言。

2、Word宏

宏是一个批量处理程序命令，正确地运用它可以提高工作效率。

微软的office软件允许用户自己编写，叫VBA的脚本来增加其灵活性，进一步扩充它的能力

Visual Basic for Applications (VBA)，是 Microsoft Office 里的一种编程语言

VBA 可以访问许多操作系统函数并支持文档打开时自动执行宏。这使得用这种语言写计算机病毒成为可能——宏病毒

3、VB和VBA的区别

VBA是VB的一个子集，也可以讲是VB的简化版。

Visual Basic for Applications（VBA）是一种Visual Basic的一种宏语言，主要能用来扩展Windows的应用程式功能，特别是Microsoft Office软件

4、基本语句、函数的作用

①Sub:过程；Function:函数

②Dim是用于声明变量并分配存储空间。

③MsgBox 弹出消息框

5、应用实例

①word中使用宏修改图片大小使图片大小相同

宏的位置

直接点上面的宏而不要点下面的下拉三角

写好之后保存点击运行就可以了

代码：
Sub 修改图片大小()
'
' 修改图片大小 宏
'

    Dim iSha As InlineShape
    For Each iSha In ActiveDocument.InlineShapes
        If iSha.Type = wdInlineShapePicture Then
            iSha.LockAspectRatio = msoFalse '不锁定纵横比
            iSha.Width = CentimetersToPoints(5) '宽5CM
            iSha.Height = CentimetersToPoints(5) '高5CM
        End If
        Next
End Sub
2、为代码添加行号

运行宏之前和运行后

代码：
Sub 代码编写行号()
'
' 代码编写行号 宏
'
    Dim parag As Paragraph
    Dim nLineNum: nLineNum = 0
    Dim selRge As Range
    Set selRge = Selection.Range
    For Each parag In Selection.Paragraphs
        nLineNum = nLineNum + 1
    selRge.Paragraphs(nLineNum).Range.InsertBefore (Format$(nLineNum, "00") & "   ")
    Next

End Sub
3、Hello World

代码：
Sub HelloWorld()
'
' HelloWorld 宏
'
    MsgBox ("hello world !")

End Sub
4、简单交互

代码：
Sub 简单交互()
'
' 简单交互 宏
'
'
    Dim X
    X = InputBox("您的姓名是：")
    MsgBox (" 欢迎" & X & "来到宏编程世界！")

End Sub