VBA中跳转语句GOTORETURN之应用

 时间:2024-10-13 19:27:50

1、通过【实例:依据打卡时间确定是否“早退”?】来分享跳转语句gotoreturn的应用!

VBA中跳转语句GOTORETURN之应用

2、在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!

VBA中跳转语句GOTORETURN之应用

3、会进入VBA编辑界面!点击工具栏内【插入用户窗体】按钮,在其下拉菜单中,选择【模块】!

VBA中跳转语句GOTORETURN之应用

4、在弹出的代码编辑窗口中输入如下代码:Sub gotoreturn()Dim i A衡痕贤伎s IntegerFor i = 2 To 10 If Sheet8.Cells(i, 1) > 17 / 24 Then GoSub 789 End IfNext iExit Sub789:Sheet8.Cells(i, 2) = "早退"ReturnEnd Sub

VBA中跳转语句GOTORETURN之应用

5、在VBA界面,同时按下CTRL+F11,返回工作表。在工作表界面,点击【开发工具】菜单下的【插入】,选择一【表单按钮】,在罗嵯脶姥空白单元格处,拉出一【按钮】,在同时弹出的【指定宏】窗口,选取编辑的代码,点击【确定】。

VBA中跳转语句GOTORETURN之应用

6、将按钮重命名为【考勤】!

VBA中跳转语句GOTORETURN之应用

7、点击【考勤】按钮,立刻判断出早退的打卡时间!

VBA中跳转语句GOTORETURN之应用
  • 怎样使用VBA返回工作表目录?
  • Excel收纳箱:通过VBA返回当前单元格的地址内容
  • 代写VBA统计某一列中各数据出现次数
  • 图示EXCEL表格vba系列43之ActiveCell.Row简介
  • excel之vba如何清空某个范围内的数据但保留格式
  • 热门搜索
    红烧螃蟹的家常做法 单反怎么拍背景虚化 宜昌旅游攻略 吃什么减肥效果最好 绿宝石攻略 淘宝店怎么推广 怎么减大腿上的肉 三国历史简介 侠客风云传任清璇攻略 郑明明化妆品怎么样