2013-04-22 136 views
2

我有一些代码可以对双击产生反应。这个动作工作得很好,虽然我的问题是,在填写由于双击动作弹出的表单之后,表单被卸载,这里没有问题,但是用户在双击的单元格内处于编辑模式。VBA - 离开当前单元格

现在,通常在Excel中,您可以按CTRL-Enter,单元格将被简单地选中,并退出编辑模式。我如何在VBA中实现这一点?

我所能做的就是将单元格向上移动一个,但实际上只是希望用户退出编辑模式并保持在当前单元格上,即双击单元格。

Private Sub Cancel_Click() 
Cells(ActiveCell.Column, ActiveCell.Row - 1).Activate 
Cells(ActiveCell.Column, ActiveCell.Row).Activate 
Unload Term 
End Sub 

有什么建议吗?

+0

您是否尝试录制宏,看看有什么表示吗?我很快就回答了如此多的EXCEL-VBA问题,而不是我可以尝试计算的。 – 2013-04-22 05:13:18

回答

2

使用BeforeDoubleClickCancel的说法,这...将取消点击进入细胞:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) 
Cancel = True 
UserForm1.Show 
End Sub 
+0

+ 1不错,简单:) – 2013-04-22 06:44:40

+0

辉煌,作品像一个魅力。 – Haissam 2013-04-22 10:13:50

相关问题