首页 > Office专区 > Excel教程 >

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

来源:互联网 2023-02-20 19:43:17 341

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

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

工具/原料

  • EXCEL软件/

方法/步骤

  • 1

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

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

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

  • 2

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

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

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

  • 3

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

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

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

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

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

    Row = 15VN办公区 - 实用经验教程分享!

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

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

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

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

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

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

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

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

    Case 15VN办公区 - 实用经验教程分享!

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

    Case 25VN办公区 - 实用经验教程分享!

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

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

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

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

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

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

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

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

  • 4

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

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

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

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

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

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

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

  • 5

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

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

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

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

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

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

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

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

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


    标签: excel技巧调用监视

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