天天看点

用户登录界面代码_你知道如何使用EXCEL制作用户登录界面吗?

            点击上方蓝色字关注我们吧!

你知道如何使用EXCEL设计用户登录界面吗?今天 我们就来学习使用EXCEL设计一个比较简易的用户登录界面。话不多说先来看下效果:

用户登录界面代码_你知道如何使用EXCEL制作用户登录界面吗?

本例制作主要包括两方面的内容:

1.设计和布局部分:

  • 底色:颜色填充
  • 文字:艺术字
  • 按键:形状工具

2.功能实现部分:

1.创建用户信息表用于存放用户名和密码。

通过VLOOKUP()检索登录的名称获取相应的密码,判断秘密是否与信息表对应来确定是否是合法可登入用户。(此处的用户信息表及VLOOKUP都是设置成跟底色一样并保护工作表以达到隐藏目的)

用户登录界面代码_你知道如何使用EXCEL制作用户登录界面吗?

2.按ALT+F11添加新模块写入如下代码,通过几行VBA代码判断 VLOOKUP()结果。正确则进入查询主界面,错误输入秘密超过3次则关闭工作薄。

Sub auto_open()

Sheets("load").Visible = True‘显示主界面

Sheets("load").Select

End Sub

Sub load_()

Application.DisplayAlerts = False

Dim i As Integer

If Range("d18") <> Range("i18") Then

MsgBox "密码错误,请重新输入密码"

Range("g17") = Range("g17") + 1‘G17单元格用于累计登入次数。

用户登录界面代码_你知道如何使用EXCEL制作用户登录界面吗?

Range("i18") = ""

Range("i18").Select

If Range("g17") >= 3 Then

MsgBox "密码错误,超过3次"

Range("g17") = 0

Workbooks("search.xlsm").Save

Workbooks("search.xlsm").Close’密码错误超过3次就关闭工作薄。

End If

Else

Sheets("load").Visible = False‘隐藏主页工作表。

Sheets("form").Select’切换到查询主界面工作表。

End If

Application.DisplayAlerts = True

End Sub

其它部分:

1.设置输入密码的单元格i18 ,自定义:**

当我们输入密码时自动变成*号。

用户登录界面代码_你知道如何使用EXCEL制作用户登录界面吗?

2.设置工作表为受保护工作表,但需设置用户名i17和秘密i18以及累计密码次数的单元格g17为可编辑区域。

至此,友好美观的用户登入界面就制作完成了,美化还可根据个人喜好调整。

今天就跟大家分享到这了,如果大家喜欢我分享的内容请收藏、转发、点赞。

-END-