本文作者:office教程网

让EXCEL文件只能在某台计算机上打开的VBA代码

office教程网 2023-05-29 23:20:45
后台-系统设置-扩展变量-手机广告位-内容正文顶部
摘要: 如何让某个EXCEL文件,限制在某台电脑上打开,而其它电脑不能打开该EXCEL文件。
这得借助VBA代码来实现。
只需要在工作薄打开的事件中,添加如下代码即可。
Privat...

如何让某个EXCEL文件,限制在某台电脑上打开,而其它电脑不能打开该EXCEL文件。

这得借助VBA代码来实现。

只需要在工作薄打开的事件中,添加如下代码即可。

Private Sub Workbook_Open()

Application.ScreenUpdating = False

On Error GoTo 100

Workbooks.Open ThisWorkbook.Path & "/验证.XLS"

Excel中IPmt函数用法

Excel中IPmt函数用法 一、IPmt语法 返回一个 Double,指定在一段时间内对定期定额支付且利率固定的年金所支付的利息值。 语法 IPmt(rate, per, nper, pv[, fv[, type]]) IPmt 函数有下列命名参数: 参数说明 rate 必要。Double 指定每一期的利率。例如,如果有一笔贷款年百分率 (APR) 为百分之十且按月付款的汽车贷款,则每一期的利率为 0.1/12,或 0.0083。 per 必要。Double 指定在 nper 间范围 1 中的付款周期。

ActiveWorkbook.Close False

Exit Sub

100:

MsgBox "你无权使用该文件"

ThisWorkbook.Close False

Application.ScreenUpdating = True

End Sub

Excel中IsDate函数的用法

Excel中IsDate函数的用法 一、IsDate 函数语法 IsDate函数功能:返回 Boolean 值,指出一个表达式是否可以转换成日期。 语法 IsDate(expression) 必要的 expression 参数是一个 Variant,包含日期表达式或字符串表达式,这里的字符串表达式是可以作为日期或时间来认定的。 说明 如果表达式是一个日期,或可以作为有效日期识别,则 IsDate 返回 True;否则返回 False。在 Microsoft Windows 中,有效日期的范围介于公元 10

后台-系统设置-扩展变量-手机广告位-内容正文底部
未经允许不得转载:

作者:office教程网,原文地址:让EXCEL文件只能在某台计算机上打开的VBA代码发布于2023-05-29 23:20:45
转载或复制请以超链接形式并注明出处 演示站

分享到:

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

微信扫一扫打赏

留言与评论(共有 0 条评论)
   
验证码: