Excel精英培训网

 找回密码
 注册
数据透视表40+个常用小技巧,让你一次学会!
查看: 2761|回复: 3

输入正确密码后运行代码

[复制链接]
发表于 2013-10-30 10:40 | 显示全部楼层 |阅读模式
输入正确密码后运行代码

Private Sub CommandButton1_Click()
    If InputBox("请输入打印密码:", "打印确认") = "123" Then
        XXXXXXXXXX密码正确 并 确认 时 运行代码XXXXXXXXXX
    End If
        XXXXXXXXXX密码错误 或 取消 时 时运行代码XXXXXXXXXX
End Sub

问题一:把密码“123” 内容 等于 工作表十九 C19单元格内容

问题二:输入密码是不直接显示数字 改为 ******

360截图20131029151222634.jpg
excel精英培训的微信平台,每天都会发送excel学习教程和资料。扫一扫明天就可以收到新教程
 楼主| 发表于 2013-10-31 08:53 | 显示全部楼层
等待
等待大虾
等待大虾出手
等待大虾出手帮忙
回复

使用道具 举报

发表于 2013-10-31 09:44 | 显示全部楼层
关于问题1按照下面写就行了
    If InputBox("请输入打印密码:", "打印确认") = sheet19.range("C1") Then
关于问题2 Inputbox 好像是不支持密码显示,你可以用窗体代替,窗体中有这个选项可以直接设置成密码模式

回复

使用道具 举报

发表于 2013-10-31 09:56 | 显示全部楼层
fcdd 发表于 2013-10-31 08:53
等待
等待大虾
等待大虾出手

我觉得窗体比较简单 可以达到对话框一样的效果你  不想对话框 冒失有点麻烦 你具体可以参考
http://www.excelpx.com/thread-199839-1-1.html  这个帖子
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|Excel精英培训 ( 豫ICP备11015029号 )

GMT+8, 2024-5-3 21:23 , Processed in 0.147998 second(s), 13 queries , Gzip On, Yac On.

Powered by Discuz! X3.4

Copyright © 2001-2020, Tencent Cloud.

快速回复 返回顶部 返回列表