三九宝宝网宝宝百科宝宝知识

如何在VBA中导入excel中的图表

02月11日 编辑 39baobao.com

[Excel EXCEL中怎样用VBA来写图表]Chart 对象成员 代表工作簿中的图表。 方法 名称 说明 Activate 使当前图表成为活动图表。 ApplyChartTemplate 将标准图表类型或自定义图表类型应用于图表。 ApplyDataLabe...+阅读

先做一个窗体userform1,在窗体上放一个image控件,大小自己调整

在图表所在表格键入

Private Sub Worksheet_Change(ByVal Target As Range)

Application.ScreenUpdating = False

Calculate

Dim pic As Chart, frame As String

Set pic = ThisWorkbook.Worksheets("sheet1").ChartObjects("Chart 1").Chart

frame = ThisWorkbook.Path & Application.PathSeparator & "temp.gif"

pic.Export Filename:=frame, filtername:="gif"

UserForm1.Image1.Picture = LoadPicture(frame)

Application.ScreenUpdating = True

End Sub

再在表格上做一个VBA控件让UserForm1显示就可以了

Sub 显示()

UserForm1.show

End Sub

图表二类似 自己改一下吧

以下为关联文档:

必须用Excel VBA绘制图表高手来Private Sub CommandButton1_Click() Call Macro1 End Sub Sub Macro1() Range("C1:C16").Select '选择区域 Charts.Add ActiveChart.ChartType = xlXYScatterSmooth ActiveCh...

必须用Excelnbsp VBA绘制图表高手来Privatenbsp;Subnbsp;CommandButton1_Click()Callnbsp;Macro1Endnbsp;SubSubnbsp;Macro1()nbsp;nbsp;nbsp;nbsp;Range(“C1:C16“).Selectnbsp;nbsp;'选择区域nbsp;nbsp;nbsp...

Excel请问如何用VBA批量设置图表格式Sub 图表批量生成试验() Sheet1.ChartObjects.Delete Dim i For i = 3 To 61 Charts.Add ActiveChart.ChartType = xlLineMarkers ActiveChart.SetSourceData Source:=Sheets(...

怎样用VB自动使excel生成图表并用VB来显示这个图表Sub 图表制作() ' ' Charts.Add ActiveChart.ChartType = xlColumnClustered ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("A1:H18"), PlotBy _ :=xlColumns Activ...

wps表格怎么插入数据图表对比图wps表格插入数据图表对比图的解决办法 我们先制作一个数据表格,把数据填入表格中。如果你是新手,那么希望你制作一个与图片中相同的表格,在下面的课程中有些操作方便我的讲解!...

wps表格图表怎么绘制曲线图1、打开WORD文档,我用的是2007的,然后点插入图表。 2、点击图表进入后,有很多的图形,根据自己总结的内容来选择图形,我随便选了一个折点图,选择完后确定。 3、会出来两个页面,...

wps表格图表怎么把竖的换成横的"选中——复制——选择性粘贴,最后一行(确定上面一行)里有一个百转置,在它前面打勾,确定,即可。 如何把WPS表格转换度成Excel 一:1、用WPS表格打开文件 2、点击文件或WPS表格(版本不...

如何用WPS移动版撰写报告中使用的图表如何用WPS移动版撰写报告时插入并编辑图表。 在多年的工作经历当中,早已意识到图表在表格数据中扮演的重要作用,比如企业的年度财报、年度销售业绩、年度利润总结等,不能仅仅只...

2007 excel怎么在图表下显示数据库2007 excel在图表下显示数据库 只是数据内容改变,图表中的系列也会跟着改变,因为他们之间是绑定的。 在图表中重新指定了数据源位置,原先的系列所链接的数据源就会断开绑定,与图...

推荐阅读
图文推荐