admin 管理员组

文章数量: 1086019


2024年3月27日发(作者:自然数的定义)

VBA常用技巧

目录

VBA常用技巧 ................................................................................................................................... 1

第4章 Shape〔图形〕、Chart〔图表〕对象 .................................................................. 2

技巧1 在工作表中添加图形 ....................................................................................... 2

技巧2 导出工作表中的图片 ....................................................................................... 7

技巧3 在工作表中添加艺术字 ................................................................................... 9

技巧4 遍历工作表中的图形 ..................................................................................... 11

技巧5 移动、旋转图片 ............................................................................................. 13

技巧6 工作表中自动插入图片 ................................................................................. 14

技巧7 固定工作表中图形的位置 ............................................................................. 17

技巧8 使用VBA自动生成图表 .............................................................................. 19

技巧9 使用独立窗口显示图表 ................................................................................. 23

技巧10 导出工作表中的图表 ................................................................................... 24

技巧11 多图表制作 ................................................................................................... 25

学习文档 仅供参考

第4章 Shape〔图形〕、Chart〔图表〕对象

技巧1 在工作表中添加图形

如果需要在工作表中添加图形对象,可以使用AddShape方法,如下面的代码所示。

#001 Sub AddShape()

#002 Dim myShape As Shape

#003 On Error Resume Next

#004 ("myShape").Delete

#005 Set myShape = pe(msoShapeRectangle, 40, 120, 280,

30)

#006 With myShape

#007 .Name = "myShape"

#008 With .ters

#009 .Text = "单击将选择Sheet2!"

#010 With .Font

#011 .Name = "华文行楷"

#012 .FontStyle = "常规"

#013 .Size = 22

#014 .ColorIndex = 7

#015 End With

#016 End With

#017 With .TextFrame

#018 .HorizontalAlignment = -4108

#019 .VerticalAlignment = -4108

#020 End With

#021 .Placement = 3

学习文档 仅供参考


本文标签: 工作 表中 技巧 图表