【excel中】如何在textbox1中按键盘上"ENTER"键就运行CommandButton1中的代码?

作者&投稿:严罡 (若有异议请与网页底部的电邮联系)
在Excel的工作表中添加文本框Textbox1,如何在文本框中输入工作表名敲回车键就能实现工作表之间的跳转?~

sub text_boxkeyup(e)
if e=chr(10)+chr(13) then
跳转。。。。
end if
end sub

使用开发工具选项卡中的命令按钮,插入即可。

Excel版本参考:2010
1、选中要插入的单元格位置;
2、点击开发工具-插入(ActiveX),命令按钮;
3、在工作表中画出一个大家合适的按钮即可;
4、查看效果(OK)。

  1. 使用onkey

 

Private Sub Workbook_BeforeClose(Cancel As Boolean)
   Application.OnKey "{ENTER}"   '大键盘回车键
   Application.OnKey "~" ’数字盘上回车键
End Sub

Private Sub Workbook_Open()
  Application.OnKey "{ENTER}", "回车程序代码"
   Application.OnKey "~", "回车程序代码"
End Sub

 

 

2. 使用Worksheet_Change 

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "$A$4" And Cells(3, 1) <> "" And Cells(4, 1) <> "" Then
'要执行代码 

   End If
End Sub

 

3.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Application.MoveAfterReturn = xlDown 
ThenIf Target.Row = 3 And Target.Column = 1
ThenCells(Target.Row - 1, 2) = "A"
End If
End If
End Sub


http://hi.baidu.com/mizuda/item/786d7a77b1c96039714423b7



为什么不把CommandButton1设好顺序,当text发生lostfocus后设为默认呢?





对于Asp.Net.我们在TextBox1中输入内容后,按下enter键后,就执行Button1的click方法。那么在page_load事件方法中写。

  TextBox1.Attributes.Add("onkeydown", "if(event.which || event.keyCode){if ((event.which == 13) || (event.keyCode == 13)) {document.getElementById('"+Button1.UniqueID+"').click();return false;}} else {return true}; ");


excel中如何设置十字光标?
点击条件格式 进入excel表格页面后,点击菜单栏中【条件格式】下面的箭头图标。点击新建规则 在弹出的新窗口页面中,选择并点击【新建规则】。点击使用公式 打开新建格式规则窗口后,选择并点击里面的【使用公式确定要设置格式的单元格】。在Excel中,可以通过以下步骤添加十字光标:1. 打开Excel,并选择需要...

在excel中如何进行数据验证?
1、在EXCEL表格中,选择需要设置下拉选项的单元格。2、菜单栏上点击【数据】。3、打开数据菜单后,就能看到【数据验证】选项了,点击【数据验证】后,在打开的选项中继续点击【数据验证】即可打开数据验证窗口去进行设置。数据验证功能介绍 据验证是Excel2013及以上版本中数据选项卡下,数据工具功能组里面的...

excel中如何按颜色统计单元格数量?
6、接着,在弹出的新建名称面板的【名称】处输入“黄色”重新命名,单击【确认】,并在弹出的名称管理界面单击【关闭】;7、较后,在计数单元格输入“COUNTA”函数,参数中输入“黄色”即可:当按“Enter”键确认,就会发现用黄色背景的单元格个数已经全部被统计出来:那么,在Excel表格技巧中,按颜色...

如何在Excel表格中进行高级筛选?
excel中数据内容进行高级筛选步骤如下:步骤1:【Ctrl+0】组合键,打开一个Excel工作簿,如下图所示。步骤2:切换至“数据”面板,在“排序和筛选”选项板中单击“高级”按钮,如下图所示。步骤3:弹出“高级筛选”对话框,单击“列表区域”右侧的按钮,如下图所示。在工作表中选择相应的列表区域,如...

在Excel中如何定积分?
【步骤 5】:用不定积分求曲线方程的原函数(x):【步骤 6】:利用Excel表格和公式的拖曳,求原函数值:如在下面表2中,选中单元格C2,在上方编辑栏中键入等号插入公式“=0.33*A2^3+0.005*A2^2”,回车确定后,用鼠标放置到C2的右下角,出现“+”时,从C2拖到C12,求得原函数值,即求得F...

excel中如何判断一个单元格内是否存在公式excel中如何判断一个单元格...
【问答】excel中如何判断一个单元格内是否存在公式?下面小编分享3个比较简单的方法吧,适合判断大片区域是否存在公式:方法1:使用定位条件 选中区域——按F5或者CTRL+G定位条件——公式——确定即可 那么此方法也为我们提供了批量修改错误公式的办法:f5定位条件——公式——只保留错误的选项——输入公式后...

excel中如何自动计算工龄?
1、打开电脑上的excel软件。2、打开需要计算工龄的表格。3、点击“C2”,在函数框中输入【=YEAR(TODAY())-YEAR(B2)】。4、在键盘上按下回车键,自动算出一个人的工龄。5、鼠标移至“C2”表格右下角的点上,空心的+号会变成实心的黑色+号,按住鼠标左键下拉至较后一名需要计算工龄的单元格。6...

excel中怎样将空白替换为空白
...表格如何替换空格?怎么在Excel表格中将空格替换为0?求教程谢谢!_百...在[替换为]后面输入数字[0],小编这里演示将空格替换为“0”,如果需要替换为“无”,写“无”即可,完成后点击【全部替换】按钮。通过上一步骤,系统弹出了提示对话框,提示用户替换的次数,直接点击【确定】按钮。方法1\/3...

excel如何筛选多个条件的数据?
EXCEL中如何从同一列筛选出需要的几个数据首先在电脑上打开你要筛选重复数据的Excel表。进入到excel表以后,选择你要筛选出重复项的一列,在页面的上方点击【条件格式】。进入到条件格式的页面以后,接着选择【突出显示单元格规则】。第一步,先在电脑上用2007版excel软件打开目标文件,接下来选中标题行...

Excel中,如何根据某一列的值来修改整行的颜色?
在Excel中,可以通过使用条件格式来根据某一列的值来修改整行的颜色,具体步骤如下:1. 选中需要修改颜色的区域,例如选中A1:B10。2. 依次点击【开始】选项卡中的【条件格式】和【新建】。3. 在弹出的【新建格式】对话框中,选择【使用公式确定要设置的格式】,并在下方的输入框中输入公式=(例如,...

耀州区19794953390: excel vba textbox内容写入到单元格 -
宗德复方: 1'程序开始sub Main 2、内容写入单元格 'Textbox1中的内容写入到第一张工作表的 第一个单元格中 sheets(1).cells(1,1)=me.textbox1.text 3、结束程序 end sub

耀州区19794953390: 在EXCEL中的VB编辑器中 -
宗德复方: 很简单啊^^^添加一个窗体,或者直接在工作表中加入这两个控件名字分别是textbox1 和 commandbutton1然后给按钮添加以下事件代码:Private Sub CommandButton1_Click()[A1:IV65536].Find(TextBox1).SelectEnd Sub运行即可!功能是把你查找输入文本框中的内容并且在工作簿中选中查到的内容所在的单元格还有不明白的或者想增加什么新功能可问我:wzz3@netease.com

耀州区19794953390: 怎么把TXT文本数据导入Excel -
宗德复方: 步骤如下: 1、首先,打开excel,选择数据选项卡,自文本选项. 2、在弹出的资源管理器界面选择存放好的txt文件后,点击打开按钮. 3、此时弹出文本导入向导,由于我的数字是以空格为分隔字符的,所以我选择分隔符号,当然,如果你的...

耀州区19794953390: 在Excel中,如何通过窗体的文本框来修改单元格数据 -
宗德复方: 你的单元格怎么设置呀,活动单元格吗?特殊单元格吗?用两个文本框解决最好了.range("a1").value=textbox1.text

耀州区19794953390: 怎么能把excel中某个单元格里的数据读入VB的textbox中 -
宗德复方: Dim a As Integer Dim xlApp As Excel.application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet Private Sub Form_Load() Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象 Set xlBook = xlApp.Workbooks.Open...

耀州区19794953390: excel中如何以文本形式储存数值 -
宗德复方: 1、选择单元格,设置单元格格式,选择数字栏,选第10行“文本”,这样你输入的数字都是以文本形式储存 2、在输入数字前加一个“'”符号,然后在输入你的数字3、用TEXT函数可以把数字转换成文本:TEXT(value,format_text)其中 Value 为数值、计算结果为数字值的公式,或对包含数字值的单元格的引用 Format_text 是作为用引号括起的文本字符串的数字格式.通过单击“设置单元格格式”对话框中的“数字”选项卡的“类别”框中的“数字”、“日期”、“时间”、“货币”或“自定义”并查看显示的格式,可以查看不同的数字格式.这样的答案你是否满意,能否帮你解决问题否?

耀州区19794953390: 如何将excel里的数据导入txt文本 -
宗德复方: 将excel里的数据导入txt文本?一般的说法,是将excel里的数据导出txt文本文件,即将excel文件 另存为 选择文件类型为CVS格式 选择文件存放位置 然后,将这个文件改名(改扩展名)为TXT.

耀州区19794953390: excel中TEXT函数得使用方法
宗德复方: 到网上下载张迎新编著的<EXCEL 2003 函数应用完全手册,阅读后定有收获.另外,可在EXCEL点击函数帮助,里面对每个函数都有很详细的介绍,并附有示例.

耀州区19794953390: Excel 怎样将窗体文本框文字添加到工作表中 -
宗德复方: 工作表中的:1 ActiveSheet.Shapes(1).TextFrame2.TextRange.Characters.Text = "文字" 窗体中的:1 userform1.textbox1.text="文字"

耀州区19794953390: Excel 工作表的日期数据怎样用text函数更换为文本数据? -
宗德复方: 假如日期数据19820506所在单元格为A1,转换后的文本数据结果在B1 【操作步骤】 (1)选中单元格B1,单击编辑栏上的插入函数快捷按钮 ,弹出“插入函数”对话框,再单击“选择类别”列表框右边的下三角按钮,在打开的列表中选择“文本”函数,在“选择函数”列表框中选择“TEXT”函数. (2)单击“确定”铵钮后,弹出“函数参数”对话框,对函数的参数进行设置,公式为“=TEXT(A1,0000-00-00)”. (3)单击“确定”按钮,即可出现函数运行后的结果.

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 星空见康网