[已解决]怎么样在2个单元格里来回切换

9910343

怎么样在2个单元格里来回切换 切换.zip (1.43 KB, 下载次数: 7)

2012-9-4 21:28 上传

点击文件名下载附件

50		怎么在A1和A2单元格来回切换
60		在A1单元格输入50，然后回车，到A2单元格，在A2单元格输入60，回车后光标又回到A1单元格

最佳答案

月排行榜 / 总排行榜

suye1010

2012-9-4 22:25

1. Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   
2. If Target.Column = 1 Then
   
3.     Select Case Target.Row
   
4.         Case 2
   
5.             Cells(2, 1).Select
   
6.         Case Else
   
7.             Cells(1, 1).Select
   
8.     End Select
   
9. End If
   
10. End Sub
    

复制代码

跳转到最佳答案楼层

hwc2ycy

worksheet里写change事件。

1. Private Sub Worksheet_Change(ByVal Target As Range)
   
2.     Application.ScreenUpdating = False
   
3.     Application.EnableEvents = False
   
4.    
   
5.     If Target.Row = 1 And Target.Column = 1 And Target.Value = 50 Then
   
6.         Range("A2").Select
   
7.     Else
   
8.         If Target.Row = 2 And Target.Column = 1 And Target.Value = 60 Then
   
9.             Range("a1").Select
   
10.         End If
    
11.     End If
    
12.     Application.EnableEvents = True
    
13.     Application.ScreenUpdating = True
    
14. End Sub
    

复制代码

hwc2ycy

切换.rar (8.41 KB, 下载次数: 6)

2012-9-4 21:36 上传

点击文件名下载附件

9910343

hwc2ycy 发表于 2012-9-4 21:36

我的意思是说当光标在A1单元格时，回车后到A2单元格，再回车后又到A1单元格--------
不管输入什么数据或是不输入数据，谢谢

hwc2ycy

9910343 发表于 2012-9-4 21:41
我的意思是说当光标在A1单元格时，回车后到A2单元格，再回车后又到A1单元格--------
不管输入什么数据或 ...

那就select_change了。
不过那个停留的时间只怕很短了。

hwc2ycy

1. 
   
2. Private Sub Worksheet_Change(ByVal Target As Range)
   
3.     Application.ScreenUpdating = False
   
4.     Application.EnableEvents = False
   
5.    
   
6.     If Target.Row = 1 And Target.Column = 1 Then
   
7.         Range("A2").Select
   
8.     Else
   
9.         If Target.Row = 2 And Target.Column = 1 Then
   
10.             Range("a1").Select
    
11.         End If
    
12.     End If
    
13.     Application.EnableEvents = True
    
14.     Application.ScreenUpdating = True
    
15. End Sub
    

复制代码

这个就是输入任何内容，回车就切换的。
不进入编辑状态回车是不会切换的。
切换2.rar (8.09 KB, 下载次数: 3)

2012-9-4 21:48 上传

点击文件名下载附件

9910343

hwc2ycy 发表于 2012-9-4 21:44
那就select_change了。
不过那个停留的时间只怕很短了。

那还有什么方法么

9910343

hwc2ycy 发表于 2012-9-4 21:47
这个就是输入任何内容，回车就切换的。
不进入编辑状态回车是不会切换的。

当我不输入内容时，就不能切换了

hwc2ycy

9910343 发表于 2012-9-4 21:50
当我不输入内容时，就不能切换了

你要不输入内容也要切换？
不输入内容，就会死锁在A1了，你在A1回车到了A2，A2又会切换到A1，这样就会锁在A1了。

9910343

hwc2ycy 发表于 2012-9-4 21:53
你要不输入内容也要切换？

我A2单元格有时不需要输入内容