首页 > Office专区 > Excel教程 >

EXCEL技巧——调用宏来个EXCEL文档加上监视器

来源:互联网 2023-02-20 19:43:17 版权归原作者所有,如有侵权,请联系我们

我们的许多EXCEL文档经常有人在使用的时候修改了原来的数据,那么我们怎么才能知道什么时候修改的呢?这里我们来看一种方法,他可以通过调用宏来实现这个监视器功能。vQp办公区 - 实用经验教程分享!

EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

工具/原料

  • EXCEL软件/

方法/步骤

  • 1

    新建一张EXCEL工作薄,单击来发工具——VisualBasic,或者同时按住Alt F11,打开VBA编辑对话框。vQp办公区 - 实用经验教程分享!

    EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

    EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

  • 2

    在打开的VBA对话框中,双击“sheet1”,打开代码编辑窗口,我们将要在代码编辑窗口中编译代码,以实现监视功能。vQp办公区 - 实用经验教程分享!

    EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

    EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

  • 3

    在编辑框中输入:vQp办公区 - 实用经验教程分享!

    Sub UsePassword()vQp办公区 - 实用经验教程分享!

    Dim Users As VariantvQp办公区 - 实用经验教程分享!

    Dim Row As LongvQp办公区 - 实用经验教程分享!

    Users = ActiveWorkbook.UserStatusvQp办公区 - 实用经验教程分享!

    Row = 1vQp办公区 - 实用经验教程分享!

    With Workbooks.Add.Sheets(1)vQp办公区 - 实用经验教程分享!

    .Cells(Row, 1) = "文本用户名"vQp办公区 - 实用经验教程分享!

    .Cells(Row, 2) = "最后修改时间"vQp办公区 - 实用经验教程分享!

    .Cells(Row, 3) = "修改使用方式"vQp办公区 - 实用经验教程分享!

    For Row = 1 To UBound(Users, 1)vQp办公区 - 实用经验教程分享!

    .Cells(Row 1, 1) = Users(Row, 1)vQp办公区 - 实用经验教程分享!

    .Cells(Row 1, 2) = Users(Row, 2)vQp办公区 - 实用经验教程分享!

    Select Case Users(Row, 3)vQp办公区 - 实用经验教程分享!

    Case 1vQp办公区 - 实用经验教程分享!

    .Cells(Row 1, 3).Value = "个人工作表"vQp办公区 - 实用经验教程分享!

    Case 2vQp办公区 - 实用经验教程分享!

    .Cells(Row 1, 3).Value = "共享工作表"vQp办公区 - 实用经验教程分享!

    End SelectvQp办公区 - 实用经验教程分享!

    NextvQp办公区 - 实用经验教程分享!

    End WithvQp办公区 - 实用经验教程分享!

    Range("A:C").Columns.AutoFitvQp办公区 - 实用经验教程分享!

    End SubvQp办公区 - 实用经验教程分享!

    vQp办公区 - 实用经验教程分享!

    EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

  • 4

    现在在VBA编辑器菜单栏中,选择“运行”——运行子过程用户窗体,现在会打开一个新的工作表,在工作表中显示:vQp办公区 - 实用经验教程分享!

    文本用户名 最后修改时间 修改使用方式 vQp办公区 - 实用经验教程分享!

    vQp办公区 - 实用经验教程分享!

    Administrator 2013-12-24 18:39 个人工作表 vQp办公区 - 实用经验教程分享!

    vQp办公区 - 实用经验教程分享!

    EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

    EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

  • 5

    现在我们关闭VBA编辑框,在下一次打开工作表的时候,选择“开发工具”——宏,打开宏对话框,选择“Sheet1.UsePassword”,单击运行按钮,就会在新的工作薄中得到结果:vQp办公区 - 实用经验教程分享!

    文本用户名 最后修改时间 修改使用方式 vQp办公区 - 实用经验教程分享!

    vQp办公区 - 实用经验教程分享!

    Administrator 2013-12-24 18:46 个人工作表 vQp办公区 - 实用经验教程分享!

    vQp办公区 - 实用经验教程分享!

    EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

    EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

    EXCEL技巧——调用宏来个EXCEL文档加上监视器vQp办公区 - 实用经验教程分享!

  • 5此文章非法爬取自百度经验
  • 以上方法由办公区教程网编辑摘抄自百度经验可供大家参考!vQp办公区 - 实用经验教程分享!


    标签: excel技巧调用监视

    办公区 Copyright © 2016-2023 www.bgqu.net. Some Rights Reserved. 备案号:湘ICP备2020019561号