Question

excle vba执行操作后，有什么命令可以由窗口切换到工作表？

Private Sub CommandButton1_Click()
Dim a As Range
Set a = Sheets(1).Range("A:A").Find(TextBox1, LookIn:=xlValues)
If Not a Is Nothing Then
a.Offset(, 6).Activate
ActiveCell.Select
Else: MsgBox "查找不到需要编号!"
End If
End Sub
以上是VBA代码，执行后还是在窗体上，在指定单元格没办法直接输入数字，要点击下工作表，才能输入。有没有方法可以执行后，自动跳转到工作表，可以直接输入数字

Answer 1

■用多窗口修改编辑Excel文档
如果要比较，修改Excel中不同单元格间的数据，双击分隔线或依次单击“窗口→取消拆分”即可。
■Excel录入时自动切换输入法
在Excel单元格中，经常遇到中英文交替输入的情况，</WBR>关闭（英文模式）”，确定后退出即可。
■Excel中粘贴时避免覆盖原有内容
在工作表中进行复制或移动操作时，</WBR>对话框中选择活动单元格移动的方向，单击“确定”按钮就可以了。
■Excel中快速排查公式错误
在Excel中，</WBR>从而定位并找到错误之源，原理类似程序调试中的“单步执行”。
■Excel中妙用“条件格式”让行列更清晰
在用Excel处理一些含有大量数据的表格时，</WBR>就可以达到目的。
■“照相机”的妙用
如果要让sheet2中的部分内容自动出现在sheet1中，</WBR>列表中找到“照相机”，并且将它拖到工具栏的任意位置。
接着拖动鼠标选择sheet2中需要在sheet1中显示的内容</WBR>就立即粘贴过来了。
■EXCEL中快速插入系统时间与日期
在用Excel进行报表处理时，</WBR>组合键即可。
■彻底隐藏Excel工作表
在Excel中可以通过执行“格式－工作表－隐藏”</WBR>将Visable值改还原即可取消隐藏。
■轻松挑出重复数据
笔者在工作过程中遇到这样的问题：</WBR>A和B两列数据之间存在逻辑关系，有重复现象出现）。
笔者的做法是：选中C2单元格，输入公式“=IF(</WBR>重复出现的数据和重复的次数自动列了出来。
■用IF函数搞定“＃DIV/0！”
在Excel中用公式计算时，经常会出现错误值“#DIV/0！</WBR>解决方法有三：
1、手工找出单元格的出错公式，一一将它们删除。</WBR>这种办法适合于出现“#DIV/0！”不多的情况。
2、如果报表中出现很多“#DIV/0！”，</WBR>就会被“－”代表，报表自然漂亮多了。
3、打印时，打开“页面设置”对话框，切换到“工作表”选项卡，</WBR>将“错误单元格打印为”选项设置为“空白”或“－”就好了。
■改变Excel自动求和值默认位置
Excel提供了自动相加功能，它可以自动将一行（或一列）</WBR>按下回车键即可。
■启动Excel时自动打开某个工作簿
在Excel2003（以下简称Excel）</WBR>则可以将该工作薄移到Excel的启动文件夹中，这样，</WBR>将要打开的Excel工作簿复制或移动到C：\Program Files\Microsoft office\Office11\XLStart文件夹中。