首页 > 开发 > 综合 > 正文

在word中如何控制graph控件

2024-07-21 02:24:08
字体:
来源:转载
供稿:网友

dim objshape as word.inlineshape
        dim objchart as object
        dim objdatasheet as object
        dim axis as graph.axis

        dim strkey as string                       'bookmark的名称

       '首先要在word中嵌入一个graph,然后把这个graph添加一个bookmark(书签),名字就是strkey的内容

       objshape = mobjdoc.bookmarks.item(strkey).range.inlineshapes.item(1)
       objshape.oleformat.doverb(verbindex:=word.wdoleverb.wdoleverbhide)
       objchart = objshape.oleformat.object()

       '设置横轴的属性   

       axis = objchart.axes(2, 1)

       '最小刻度
       axis.minimumscale = 0

       '主要刻度单位
       axis.majorunit = 10

       '次要刻度单位
       axis.minorunit = 10

       '最大刻度
       axis.maximumscale = 50

      '在graph的表格中填写内容

       objdatasheet = objchart.application.datasheet
       objdatasheet.cells(1, 1) = "aa"

       '对表格进行更新

       objchart.application.update()

       '退出graph程序
       objchart.application.quit()


发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表