MyException - 我的异常网
当前位置:我的异常网» C# » 寻 zswang(伴水清清)(专家门诊清洁工) + 有关问题:

寻 zswang(伴水清清)(专家门诊清洁工) + 有关问题:在excel 宏里设置保护密码

www.MyException.Cn  网友分享于:2013-12-16  浏览:526次
寻 zswang(伴水清清)(专家门诊清洁工) + 问题:在excel 宏里设置保护密码
if(fd.FileName!=string.Empty)
                        {
                                      oBook   =   oBooks.Open(fd.FileName,   oMissing,   oMissing,
                                                oMissing,   oMissing,   oMissing,   oMissing,   oMissing,   oMissing,
                                                oMissing,   oMissing,   oMissing,   oMissing,   oMissing,   oMissing);

                                      CodeModule   vCodeModule   =   oExcel.ActiveWorkbook.VBProject.VBComponents.Add(
                                              vbext_ComponentType.vbext_ct_StdModule).CodeModule;
                               
                                //这里宏代码就可以放到配置文件里了
                                vCodeModule.AddFromString(@ "
                                                                Sub   DefinitedMacro()
                                                                        Columns( " "A:A " ").Select
                                                                        Selection.Columns.AutoFit
                                                                        ActiveSheet.Protection.AllowEditRanges.Add   Title:= " "区域1 " ",   Range:=Columns(   _
                                                                                " "D:F " ")
                                                                        ActiveSheet.Protect   DrawingObjects:=True,   Contents:=True,   Scenarios:=True

文章评论

软件开发程序错误异常ExceptionCopyright © 2009-2015 MyException 版权所有