你现在位置：首页>技术论文>软件知识>正文
ifix:如何禁止excel报表被修改
日期：2006-9-25 23:40:43 来源：本站整理  
点击： 作者：未知
点击【 大 中 小 】放大字体.

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

WWW_PL※CJS_COM－PLC－技.术_网

匿名回复：

WW.W_PLC※JS_C,OM－PL,C－技.术_网

    excel 里面可以禁止
plcjs.技.术_网

匿名回复：
W1WW_P4LCJS_COM－PLC－技.术_网

    可在程序生成报表后只给出预览界面,
WW.W_PLC※JS_C,OM－PL,C－技.术_网

　　不给出原始的网格,或者在EXCEL中直接设定模板为禁止.
——可——编——程——控－制－器－技——术——门——户

匿名回复：
WWW_PL※CJS_COM－PLC－技.术_网

    请教：
WWW_P※LCJS_COM－PLC－)技.术_网

　　 我如果把模板禁止。如何用vba打开模板正常写入数据呢。
WW.W_PLCJS_COM－PLC－技.术_网

　　 如果设成浏览模式，是不是把文档属性设成不可见？
WW.W_PLCJS_COM－PLC－技.术_网

　　多指教！
P.L.C.技.术.网——可编程控制器技术门户

匿名回复：
WWW_PLCJS_COM－PLC－技.术_网

    可以改成只能预览的格式了。
WW.W_PLCJS_COM－PLC－技.术_网

　　多谢。
WWW_PLCJ－S_COM－PLC－技.术_网(可－编程控－制器技术－门户)

匿名回复：
WWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)

    可以利用web ole控件进行预览，这样即使修改了，也不会保存，我就是这么做的。打印可以利用后台的vba编程进行。
WWW.PLCJS.COM——可编程控制器技术门户

匿名回复：
WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)

    好像应该使用打开模板再另存的做法更合适一些，我就是这样做的，操作员打开的永远只是报表不会打开模板
WWW.PLCJS.COM——可编程控制器技术门户

匿名回复：
WWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)

    各位高手：
P.L.C.技.术.网——可编程控制器技术门户

　　 大家好！
W1WW_P4LCJS_COM－PLC－技.术_网

　　 我现在在重庆的一家系统集成公司工作。眼下，我们公司接的一个项目是用ABB的AC800F做转炉，然后用vba作报表。小弟对vba是菜菜鸟，希望各位高手提供关于用vba作报表的资料，小弟感谢万分。最好有些用vba作报表的小程序。我的邮箱：188950819@qq.com
WW.W_PLC※JS_C,OM－PL,C－技.术_网

　　帮帮忙，谢谢！qq：188950819欢迎指教！
WW.W_PLCJS_COM－PLC－技.术_网

　　
plcjs.技.术_网

　　
WWcW_PLCJS_COM－PLC－技.术_网

匿名回复：
WWW_PL※CJS_COM－PLC－技.术_网

    我们用的也是ABB的AC800F，本人想用vba作报表，但是不会，请各位大哥哥，大姐姐们帮忙，万分感谢！
WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)

　　
WW.W_PLCJS_COM－PLC－技.术_网

　　zhangshuaigreat@163.com
WWW_PLCJS_COM－PLC－技.术_网

　　qq： 172389230
WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)

　　
WWW_P※LCJS_CO※M－PLC－技－.术_网

匿名回复：
P.L.C.技.术.网——可编程控制器技术门户

    用WEBBROWER
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户

匿名回复：
WWW_PLC※JS_COM－PmLC－技.术_网

    我有报表原代码，详情
WWW_PLCJS_COM－PLC－技.术_网

　　LYJ005@263.NET
WWW_P※LCJS_CO※M－PLC－技－.术_网

匿名回复：
WWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)

    能不能给我一分报表原代码
——可——编——程——控－制－器－技——术——门——户

　　yinbangle@126.com
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户

匿名回复：
WWW_P※LCJS_COM－PLC－)技.术_网

    能不能给我一份报表源代码 现行谢过了
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)

　　houhoulinglong@163.com
WW.W_PLC※JS_C,OM－PL,C－技.术_网

匿名回复：
WWW_PLC※JS_COM－PLC－技.术_网(可编程控※制器技术门户)

    给我也发一份吧,谢谢了,信箱:zyj52575257@sohu.com
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户

匿名回复：
WWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)

    我也要一份，navy98072@sohu.com,谢谢了！！！
WWW_PLCJS_COM－PLC－技.术_网

匿名回复：
WWW_PLC※JS_COM－PmLC－技.术_网

    设计报表时用excel，预览时用Microsoft　的Excel View 软件，只能查看和打印！
W1WW_P4LCJS_COM－PLC－技.术_网

匿名回复：
W1WW_P4LCJS_COM－PLC－技.术_网

    用Excel做报表本身很简单，主要是工艺不同要求不同略有复杂，如下为偶们一工程中做的一小报表源程序：
W1WW_P4LCJS_COM－PLC－技.术_网

　　读数据传到excel
WWW_P※LCJS_COM－PLC－)技.术_网

　　Public Sub SendExcel()
WW.W_PLC※JS_C,OM－PL,C－技.术_网

　　Dim pa, date1, date2 As String
——可——编——程——控－制－器－技——术——门——户

　　Dim i, j, k As Integer
WW.W_PLC※JS_C,OM－PL,C－技.术_网

　　Dim Ct As Object
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)

　　Dim xlBook As excel.Workbook
——可——编——程——控－制－器－技——术——门——户

　　Dim xlSheet As excel.Worksheet
plcjs.技.术_网

　　
WWcW_PLCJS_COM－PLC－技.术_网

　　Dim Temp As String
W1WW_P4LCJS_COM－PLC－技.术_网

　　Dim Rage As String
WWW_PLCJS@_COM%－PLC－技.术_网

　　Dim sTemp As String
WWW_PL※CJS_COM－PLC－技.术_网

　　Dim FsTemp As String
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)

　　Dim TsTemp As String
——可——编——程——控－制－器－技——术——门——户

　　Dim LenTemp As Integer
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户

　　Dim kf As Integer
WWW_PLCJ－S_COM－PLC－技.术_网(可－编程控－制器技术－门户)

　　Dim Ye As Integer
WWW_PLC※JS_COM－PmLC－技.术_网

　　Dim HourNum As Integer
WWW_PL※CJS_COM－PLC－技.术_网

　　Dim ex
WWW_P※LCJS_CO※M－PLC－技－.术_网

　　Dim exwbook
WWW_PLC※JS_COM－PmLC－技.术_网

　　Dim Pass As String
WWcW_PLCJS_COM－PLC－技.术_网

　　Dim PNum As Integer
WWW_PLCJ－S_COM－PLC－技.术_网(可－编程控－制器技术－门户)

　　
WWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)

　　
WW.W_PLC※JS_C,OM－PL,C－技.术_网

　　
WWW_P※LCJS_COM－PLC－)技.术_网

　　 Set ConnDb = New ADODB.Connection
WWW_PLC※JS_COM－PmLC－技.术_网

　　
P_L_C_技_术_网——可——编——程——控－制－器－技——术——门——户

　　 pa = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Report-Index.mdb" & ";User ID=;Password=;"
WWW_P※LCJS_COM－PLC－)技.术_网

　　 ConnDb.Open pa
P.L.C.技.术.网——可编程控制器技术门户

　　 ConnDb.CursorLocation = adUseClient
P.L.C.技.术.网——可编程控制器技术门户

　　
WWW_PLCJS@_COM%－PLC－技.术_网

　　 Sql = "select * from ChooseIndex where ReportName=" & Combo1 & ""
WWW.PLCJS.COM——可编程控制器技术门户

　　 Set rs3 = ConnDb.Execute(Sql)
W1WW_P4LCJS_COM－PLC－技.术_网

　　
WW.W_PLCJS_COM－PLC－技.术_网

　　
WW.W_PLC※JS_C,OM－PL,C－技.术_网

　　
WWW_P※LCJS_CO※M－PLC－技－.术_网

　　Expath = App.Path & "\" & rs3("DataName") & "Index.xls"
WWW_PLC※JS_COM－PmLC－技.术_网

　　
WWW_PLCJS@_COM%－PLC－技.术_网

　　
WWcW_PLCJS_COM－PLC－技.术_网

　　Dim p1 As String
WWW_P※LCJS_CO※M－PLC－技－.术_网

　　Dim p2 As String
WWW_PLCJ－S_COM－PLC－技.术_网(可－编程控－制器技术－门户)

　　
——可——编——程——控－制－器－技——术——门——户

　　On Error Resume Next

本新闻共3页,当前在第1页1 2  3  
WWW_P※LCJS_COM－PLC－)技.术_网
评论内容
载入中...
载入中...
P
L
C
技
术
网
|
可
编
程
控
制
器
技
术
门
户
|
十
万
P
L
C
工
程
师
的
共
同
选
择
！
·最新招聘信息
·最新求职信息
·推荐产品
·推荐厂商
·栏目热门排行
·站内热门排行