最近有个工程。ifix组态软件。我用excel做报表输出。如何做，防止业主在使用的时候，修改报表（打开报表浏览或者打印的时候）。

匿名回复：
    excel 里面可以禁止
匿名回复：
    可在程序生成报表后只给出预览界面,
　　不给出原始的网格,或者在EXCEL中直接设定模板为禁止.
匿名回复：
    请教：
　　 我如果把模板禁止。如何用vba打开模板正常写入数据呢。
　　 如果设成浏览模式，是不是把文档属性设成不可见？
　　多指教！
匿名回复：
    可以改成只能预览的格式了。
　　多谢。
匿名回复：
    可以利用web ole控件进行预览，这样即使修改了，也不会保存，我就是这么做的。打印可以利用后台的vba编程进行。
匿名回复：
    好像应该使用打开模板再另存的做法更合适一些，我就是这样做的，操作员打开的永远只是报表不会打开模板
匿名回复：
    各位高手：
　　 大家好！
　　 我现在在重庆的一家系统集成公司工作。眼下，我们公司接的一个项目是用ABB的AC800F做转炉，然后用vba作报表。小弟对vba是菜菜鸟，希望各位高手提供关于用vba作报表的资料，小弟感谢万分。最好有些用vba作报表的小程序。我的邮箱：188950819@qq.com
　　帮帮忙，谢谢！qq：188950819欢迎指教！
　　
　　
匿名回复：
    我们用的也是ABB的AC800F，本人想用vba作报表，但是不会，请各位大哥哥，大姐姐们帮忙，万分感谢！
　　
　　zhangshuaigreat@163.com
　　qq： 172389230
　　
匿名回复：
    用WEBBROWER
匿名回复：
    我有报表原代码，详情
　　LYJ005@263.NET
匿名回复：
    能不能给我一分报表原代码
　　yinbangle@126.com
匿名回复：
    能不能给我一份报表源代码 现行谢过了
　　houhoulinglong@163.com
匿名回复：
    给我也发一份吧,谢谢了,信箱:zyj52575257@sohu.com
匿名回复：
    我也要一份，navy98072@sohu.com,谢谢了！！！
匿名回复：
    设计报表时用excel，预览时用Microsoft　的Excel View 软件，只能查看和打印！
匿名回复：
    用Excel做报表本身很简单，主要是工艺不同要求不同略有复杂，如下为偶们一工程中做的一小报表源程序：
　　读数据传到excel
　　Public Sub SendExcel()
　　Dim pa, date1, date2 As String
　　Dim i, j, k As Integer
　　Dim Ct As Object
　　Dim xlBook As excel.Workbook
　　Dim xlSheet As excel.Worksheet
　　
　　Dim Temp As String
　　Dim Rage As String
　　Dim sTemp As String
　　Dim FsTemp As String
　　Dim TsTemp As String
　　Dim LenTemp As Integer
　　Dim kf As Integer
　　Dim Ye As Integer
　　Dim HourNum As Integer
　　Dim ex
　　Dim exwbook
　　Dim Pass As String
　　Dim PNum As Integer
　　
　　
　　
　　 Set ConnDb = New ADODB.Connection
　　
　　 pa = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Report-Index.mdb" & ";User ID=;Password=;"
　　 ConnDb.Open pa
　　 ConnDb.CursorLocation = adUseClient
　　
　　 Sql = "select * from ChooseIndex where ReportName=" & Combo1 & ""
　　 Set rs3 = ConnDb.Execute(Sql)
　　
　　
　　
　　Expath = App.Path & "\" & rs3("DataName") & "Index.xls"
　　
　　
　　Dim p1 As String
　　Dim p2 As String
　　
　　On Error Resume Next