一区二区三区电影_国产伦精品一区二区三区视频免费_亚洲欧美国产精品va在线观看_国产精品一二三四

聯系我們 - 廣告服務 - 聯系電話: 2025年07月26日 05:15 星期六
您的當前位置: > 關注 > > 正文

java中flypaper怎么使用?Java 基礎接口fly

來源:CSDN 時間:2022-12-08 15:01:00

適用EXCEL2003版


(相關資料圖)

因為2003版的如果禁用宏(宏安全性為高),則無法運行宏。

所以此文是如果設置宏表,來提高安全性

1,用右鍵點擊任意工作表名稱---插入,在跳出的提示中(如下圖),選擇MS EXCEL 4.0 宏表

2,在宏表中寫入代碼如下:

A2=ERROR(FALSE)

A3 =RUN("MYMacro")

A4 =IF(ISERROR($A$3))

A5 =GOTO($A$11)

A6 =END.IF()

A7 =ERROR(TRUE)

A8 =RETURN()

A11 =ALERT("對不起!由于禁用了宏,本文件將自動關閉!請將宏安全性調整為低再打開此文件",3)

A12 =FILE.CLOSE(FALSE)

A13 =RETURN()

3,運行以下代碼,添加每個工作表激活時的代碼,并深度隱藏宏表

以下代碼中,宏表名為“Macro1”,如果你的宏表名不是這樣的,把代碼中的Macro1換成你宏表的名字,或者把你的宏表名改為“Macro1”

Sub AddName() Dim Sh As WorksheetFor Each Sh In SheetsActiveWorkbook.Names.Add Name:=Sh.Name & "!auto_activate", RefersTo:="=Macro1!$A$2"Next Sheets("Macro1").Visible = -1 End Sub

4,在任意模塊中加入這個宏

Function MYMacro()

End Function

保存,完工!

責任編輯:

標簽:

相關推薦:

精彩放送:

新聞聚焦
Top 主站蜘蛛池模板: 基隆市| 逊克县| 靖西县| 布拖县| 车险| 洪洞县| 喀喇沁旗| 安乡县| 八宿县| 宽城| 肃北| 新疆| 武川县| 汤阴县| 岫岩| 衡阳县| 延川县| 新宾| 嵊州市| 应用必备| 上饶县| 青河县| 青浦区| 涪陵区| 汽车| 景洪市| 珲春市| 红安县| 密山市| 遵义市| 祁阳县| 连州市| 邹城市| 印江| 镇原县| 老河口市| 桐柏县| 墨玉县| 托里县| 庄河市| 望都县|