【原】VBA技巧 选中单元格后自动进入编辑状态

本技巧的目的：了解如何使用事件代码，掌握 SendKeys 方法

• 目标：在指定单元格区域，无需双击即可进入编缉状态

• 

1. 代码助手

• 代码助手下载地址 http:///blog/archives/11297  

• 输入中文：不允许多选单元格 + 空格 即可弹出代码

• 

• 或者输入英语：Target + 空格 同样可以弹出代码

• 

• 实现快速输入代码。

2. 事件代码

• 进入事件的方法：

• 工作表 - 标签 - 右键 - 查看代码

• 

• 进入VBA后，双击要写入事件的工作表名称，选择 Worksheet，再选择需要的事件

• 

• SelectionChange: 当工作表上的选定区域发生改变时发生此事件。

• 代码：

• 

• If Not Target.Address Like "*:*" And Target.Column = 1 Then

•     '如果目标区域的地址中不含 : , 即不是多个单元格。并且 目标的列数 为第1列

•     If Target <> "" Then '如果 目标值 不是空的

•          Application.SendKeys "{F2}" '发送按键

•      End If

• End If

• 注释:

• Application.SendKeys 方法: 将击键发送给活动应用程序

• Keys 必选参数 要发送给应用程序的键或组合键

• Wait 可选参数 True，则 Excel 会等到处理完按键后将控件返回给宏；False（或者省略该参数），则继续运行宏而不等至处理完按键。

•