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如何清空某个范围内的数据但保留格式
  • 热门搜索
    屋顶上的小孩手抄报 法制校园手抄报 关于英语的手抄报图片 关于科技的手抄报图片 森林防火手抄报内容 关于感恩的心手抄报 法制漫画手抄报 五年级上册英语手抄报 防震减灾手抄报花边 绿色校园手抄报资料