pb导出EXCEL柱状图

使用的方法是，先导出数据，然后在excel文件中写入一个生成柱状图的宏，然后运行该宏。使用的是excel2003，写入宏必须使安全性：信任对于‘Visual Basic项目’的访问。但现在客户把该权限限制了，不允许打开，就没法插入宏，也就没法生成图标。请问各位有没有其他方法生成。谢谢！

8 个解决方案

#1

你先在EXCEL弄好数据源以及图，然后每次拷贝一个只把数添进取不就行了。
记得跟你用户说，你那个叫模版。

#2

我现在是每次导出都是用的这样新建一个新的excel文件：
ExcelObject = CREATE OLEObject

li_return = ExcelObject.ConnectToNewObject("excel.application" )
if li_return < 0 then
messagebox("提示","您的计算机可能没装EXCEL，所以不能导出！")
return
end if


WorkBooks = ExcelObject.Application.Workbooks.add()

如果使用模板怎么写呢，谢谢

#3

学习了

#4

先filecopy再把
WorkBooks = ExcelObject.Application.Workbooks.add() 
替换成
ExcelObject.workbooks.open(ls_filename) 

#5

通过宏便捷可以查看宏VB代码
这些代码基本都可以翻译成PB的代码，通过直接对ExcelObject进行操作重现宏的效果。
例如：
ExcelObject.selection.Document.text1.text="testname" 
ExcelObject.selection.Document.CheckBox1.Value = True

#6

没玩过这个。。。

#7

可以尝试如下：
先将数据保存为WMF图片，然后通过OLE将图片插入到EXCEL。

#8

偶记得某个dw2excel里是这样写的：
截屏
根据dw位置裁剪。
把图片粘到excel中。