`

VBA 禁止在某个sheet中使用键盘Delete键

    博客分类:
  • VBA
阅读更多
1.按Alt+F11打开VBA编辑窗口

2.双击要禁止delete的sheet,例如sheet1

3.在右边的编辑区的最上面加入下面的函数声明
Private Declare Function GetKeyboardState Lib "user32" (pbKeyState As Byte) As Long

对该sheet追加change事件
Private Sub Worksheet_Change(ByVal Target As Range)
Dim keys(0 To 255) As Byte
GetKeyboardState keys(0)
If keys(46) > 127 Then
   Application.EnableEvents = False
   Application.Undo
   MsgBox "这个sheet不能使用delete键"
   Application.EnableEvents = True
End If
End Sub 

因为Change好像没有Cancel参数,所以加入Application.EnableEvents = False Application.Undo意思就是撤消上一操作,即改回去将删除的东西给改回去。

分享到:
评论

相关推荐

    Excel_中使用VBA将所有sheet中的数据和sheet信息汇总到总表中的例子

    一个在Excel中使用VBA将所有sheet中的数据和sheet信息汇总到总表中的例子,使用VBA编写,在第一个sheet中的宏check,使用时需要打开excel的宏安全,执行时会在合计页填充所有其他sheet的sheet名称,链接,编号,合计...

    VB如何拦截键盘输入

    在VB(Visual Basic)编程中,拦截键盘输入是一项常见的需求,尤其在开发特定类型的软件时,如游戏、安全应用或自定义输入控件等。本文将深入探讨如何在VB环境中实现键盘输入的拦截和处理。 首先,我们需要了解VB中...

    excel 批量操作sheet文档 VBA

    本文将详细介绍如何使用 VBA 实现批量操作 Sheet 文档。 一、启用 VBA 要使用 VBA,需要首先启用它。在 Excel 中,点击“文件”菜单,然后点击“选项”,在“Excel 选项”窗口中,选择“自定义功能区”,并勾选...

    Excel VBA 根据Sheet2中的表格数据处理Sheet1中的数据,包括比较、复制

    Excel VBA 根据Sheet2中的表格数据处理Sheet1中的数据,包括:1,对sheet1和sheet2指定数据的循环比较;2,符合条件的数据复制至sheet1中,并且用表格颜色进行标记

    VBA鼠标键盘钩子类.xlsm

    VBA鼠标键盘钩子类.xlsm

    HOOK禁止键盘输入

    vba调用HOOK函数禁用鼠标、键盘,方便后台程序执行,但没有禁止任务管理器

    模拟按键精灵(EXCEL+VBA)

    主要的函数都放在KeyB_Mouse_sub模块中。代码无加密 2.6版更新:利用钩子改进了抓点方式(感谢小FISH给的范例),改进了定位图片坐标的函数,加入一些新的函数,如waitkey,详见说明。 表格说明:就是控制鼠标键盘...

    VBA实现文件操作、超链接、新建sheet

    在Excel VBA中,我们可以使用内置的对象模型来执行文件的基本操作。例如,`FileSystemObject`(FSO)是用于处理文件和文件夹的主要工具。通过创建FSO对象,你可以: 1. **新建文件**:使用`CreateTextFile`方法创建...

    复制目录下Execl文件sheet1表到新文件vba

    通过上述代码,你可以轻松地在一个目录下的所有Excel文件中找到Sheet1,并将其复制到一个新的Excel文件中。这对于数据整理、合并等工作非常有用。 #### 四、注意事项 1. **文件格式**:确保所有的Excel文件都是....

    vba:根据一个sheet内容批量替换整个工作簿

    vba:根据一个sheet内容批量替换整个工作簿,vba:根据一个sheet内容批量替换整个工作簿,vba:根据一个sheet内容批量替换整个工作簿,vba:根据一个sheet内容批量替换整个工作簿,vba:根据一个sheet内容批量替换整个工作...

    使用VB捕捉键盘事件

    在VB(Visual Basic)编程环境中,捕捉键盘事件是创建用户交互功能的重要部分。VB提供了丰富的事件处理机制,允许程序员响应用户的键盘输入。本教程将详细解释如何在VB中实现键盘事件的捕捉,并通过分析给定的文件...

    使用VBA将excel的数据存放到mysql数据库里面,并将内容显示到sheet数据表

    本教程将详细介绍如何使用VBA将Excel数据存入MySQL数据库,并将结果回显到Sheet数据表中。 首先,我们需要安装MySQL ODBC驱动程序,这将允许VBA通过ODBC数据源与MySQL数据库进行通信。安装完成后,在“控制面板”的...

    让Excel VBA编辑器支持鼠标中键滚动(VB同样)

    标题中的“让Excel VBA编辑器支持鼠标中键滚动(VB同样)”指的是一个功能增强项目,目的是在Excel的Visual Basic for Applications (VBA)编辑器中启用鼠标中键滚动的功能,这通常在默认设置下是不可用的。在VB6...

    VBA一键sheet页另存为Excel

    VBA一键sheet页另存为Excel,批量拆分Excel sheet页为单个文档。

    运用Excel VBA在EXcel中实现的提取单元格中特定文字

    在这个特定的例子中,我们使用VBA编写了一个小程序,目的是检查一个单元格中的文本是否包含某个特定字符,并用"."(点号)标记该单元格是否含有这个字符。以下是对这一知识点的详细解释: 1. **Excel VBA基础**:...

    VB测试键盘是被按下Shift键、Ctrl键等功能键.rar

    VB测试键盘功能键,判断键盘上的Shift键、Ctrl键、Alt键是否被按下过,主要是根据键盘的返回值来判断出按下了什么键,下面来细看代码:  Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)  '...

    vba 在excle中的应用

    假设我们需要在某个Excel工作簿中实现禁止用户添加新工作表的功能,可以通过以下步骤来实现: 1. **理解代码逻辑**: - 当用户尝试添加新工作表时,触发`Workbook_NewSheet`事件。 - 通过VBA代码禁用警告框,删除...

    VBA-拆分表格,将sheet拆成多个

    VBA-拆分表格,将sheet拆成多个

    WPS VBA宏使用权限

    在IT行业中,VBA(Visual Basic for Applications)是一种强大的编程语言,主要用于自动化和扩展Microsoft Office应用程序的功能。在WPS Office中,VBA同样被用来创建宏,实现文档处理的自动化和自定义功能。本篇...

    EXCEL VBA合并sheet文件代码

    本文将深入解析如何利用VBA实现Excel中多个Sheet的合并,这一过程通常在数据整合、报告汇总等场景下非常有用。 ### 核心功能:合并Sheet #### 1. **理解需求** 在处理大型数据集时,我们可能有多个工作表(Sheet)...

Global site tag (gtag.js) - Google Analytics