求助，指定单元格，回车后运行宏

糊涂草 · 发表于 2024-2-24 11:32

本帖最后由糊涂草于 2024-2-24 11:34 编辑

不想使用点击按键来触发宏运行
在O11单元格回车自动运行下面的宏
Sub 矩形1_Click()
Dim i%, arr()
i = Sheets(2).[a65536].End(3).Row + 1
arr = Range("N3:N11")
Range("N6:N11").ClearContents
Sheets(2).Cells(i, 1).Resize(1, 9) = Application.Transpose(arr)
End Sub

qline302 · 发表于 2024-2-24 23:21

想法很好，API估计能实现，个人认为问题就变复杂了。Enter为常用确认键，这样需要在其他情况的使用增加判别代码和时间。建议录制一个宏设置快捷键（如下图），然后修改宏代码为实际要执行的程序作为变通。EH高手如云，同样期待看到他们的方案。

x-xx-xx · 发表于 2024-2-25 08:11

事件选中执行

sj15627581616 · 发表于 2024-2-25 08:24

两种方案，一种是Worksheet_Change，当修改O11时执行，另一个是创建自定义快捷键指定过程，个人比较建议使用第二种

糊涂草 · 发表于 2024-2-25 09:23

本帖最后由糊涂草于 2024-2-25 09:27 编辑

sj15627581616 发表于 2024-2-25 08:24
两种方案，一种是Worksheet_Change，当修改O11时执行，另一个是创建自定义快捷键指定过程，个人比较建议使 ...

好的我试试，非常感谢！

		自动登录	找回密码
密码			免费注册

[求助] 求助，指定单元格，回车后运行宏