VBA自动化处理数据5-绘制图表自动化处理数据一共写了5期,从初始的构想到最终图表的绘制。本期为此系列总结最后一期。在绘制图表前需要思考的几个问题:选取一定区域的数据,用来生成图表将生成图表,放置到希望的位置上调整图表类型包含是否柱状图,折线图以及主副坐标轴格式化图表:填充颜色、设定图表标题、坐标轴标题图表数据源图表数据的来源,如果是完整的区域,可以直接使用range()来引用。如果是一个区域的某几行。那么就需要在绘制后删除其中的series序列完整区域绘图 Sub addchart() '生成一个折线图图表' Set chart2 = ActiveSheet.Shapes.AddChart2(XlChartType:=xlLineMarkers) With chart2.Chart '设置有标题并修改图表标题' .HasTitle = True .ChartTitle.Text = "this is chart2" '设置图表引
VBA处理EXCEL单元格格式使用VBA可以快速处理一些格式设置。这里主要分三步循环EXCEL区域判定符合条件的单元格设定单元格格式设置单元格格式主要是针对填充单元格的颜色。使用的方法是Range().Interior.Color或者ColorIndexsub setcellcolor() '设置区域A1:A10的颜色为绿色 Range("A1:A10").Interior.Color = vbGreen '设置区域A1:A10的颜色为2即白色 Range("A1:A10").Interior.ColorIndex = 2 end subcolor也可以用RGB样式来引用。colorIndex是Excel内置的颜色排序,使用数字来对应不同的颜色。有56个颜色。设置字体样式常用的字体设置有是否加粗,字体类型,字体大小,颜色等。sub setfont() '设置字体颜色为白色' Range("A1:A10").Font.Color = vbWh
cemon_liu
爱研究的质量人