用VB调用Excel实现SPD表自动编制
starline To starline+3 '小表格的行数biaosheet.Rows（i）.RowHeight=25For j=a To a+1 '小表格的列数biaosheet.Columns（j）.ColumnWidth=6 '设置列宽With biaosheet.Range（.Cells（i，j）， .Cells（i，j））.Borders.LineStyle=xlContinuous'设置边框为是实线End WithNext jbiaosheet.Columns（a+2）.ColumnWidth=0.8 '设置间隔列宽Next ia=a+3r=x Mod 6If r=0 Then starline=starline+5If r=0 Then a=1Next xstarline=starline+3……4.3 打印及预览借助预览及打印生成所需要的工作表后，就可以对Excel发出预览、打印指令[5]。代码如下：……'设置表的页边距biaosheet.PageSetup.LeftMargin=1.5/0.035biaosheet.PageSetup.RightMargin=1#/0.035biaosheet.PageSetup.TopMargin=1/0.035biaosheet.PageSetup.BottomMargin=1.5/0.035'打印表格biaosheet.PrintPreviewbiaosheet.PrintOut……5 结束语本文论述了VB编程语言与Excel表格处理软件相结合的方法，成功地解决了VB在自动绘制表格方面编程难度较大，效率不高的问题。该方法通过在SPD表格设计实例中的应用，充分体现了VB调用Excel设计表格的灵活性，减少了手工设计表格的繁琐过程，减轻了繁重的工作，
<<上一页 下一页>>
广州市越秀区图书馆版权所有。
联系电话：020-87673002
本站访问人数：