想在Excel中搞个按钮,单击后回到制定的工作表,哪位VBA高手可以给我个代码!谢谢

如题所述

直接录制即可。。
sheets("sheet1").select
温馨提示:内容为网友见解,仅供参考
第1个回答  2011-08-09
Sheets("你的工作表名").Select

其实你这种代码,直接录制一个宏,就知道代码了
第2个回答  2011-08-09
还是通过选定一单元格,输入命令功能,再在该单元格插入超级链接来得快速,简单
第3个回答  2011-08-09
简单来说,就是通过执行宏,来实现我已写好的窗体代码高手帮帮忙,很急问题有什么问题 Baidu Hi 我吧这个我常搞

怎样在excel里用vba之类的实现点击一个按钮后一行数据自动复制粘贴到...
假设你数据在A2到F2里输入。任意插入一图形,右键点该图形,指定宏,新建。在出来的窗口中再Sub和End Sub之间 粘贴如下代码:Dim i, j As Integer i = --Range("A2")For j = 1 To 6 Cells(i, j) = Cells(2, j)Next j 回到Excel,就有了你要的。

怎样用VBA语句编写一个按钮单击链接到EXCEL工作表的代码?
sheet1为当前工作表,sheet2是目的工作表在sheet1中菜单栏 “视图”-“工具栏”-选择“窗体”选择 按钮控件,指定宏界面-选择“新建” 输入Sub 按钮1_单击()Sheets("Sheet2").Select End Sub 修改的时候可以 右键-指定宏-编辑

如何在excel中通过单元格输入条件,定位到相应的工作表
1、ALT+F11,进入VBE编辑去 2、双击Sheet1,粘贴如下代码:Private Sub Worksheet_Change(ByVal Target As Range)If Target.Address = "$A$1" Then Sheets(Target.Value).Select End If End Sub 3、返回工作表,在A1单元格输入工作表名 4、回车,查看效果 ...

excel 插入一个按钮,按一下能让其返回到指定单元格
在主菜单点击"视图","工具栏","控件工具箱"后会跳出一个控件工具选择框。选择"命令按钮"后,鼠标会变为细的十字标。在工作表范围内按着鼠标左键,然后拉动就会出现控件按钮就放开鼠标左键。按钮键就完成了,把鼠标移到按钮键双击鼠标左键就进入VBA编辑器。再把以下代码拷贝到编辑器中。Private Sub...

vba跳转到指定工作表
以下代码可以实现输入工作表名称,按回车或点击确定后跳转至当前工作簿的该工作表 Sub 跳转()Dim sn As StringDim x As Integersn = InputBox("请输入要跳转到的工作表的名字")For i = 1 To Sheets.CountIf Sheets(i).Name = sn ThenSheets(i).Activatex = 1End IfNext iIf x = 0 Then...

如何EXCEL表中的按钮调用VBA在当前工作簿生成一个新表呢?代码总出错...
你的逻辑有问题!如果先找到对应的表后应该结束查找的,但你又继续查找,然后 bReturn 又被复位成 False。建议关键一段代码修改如下:For Each oSht In ActiveWorkbook.SheetsIf oSht.Name = biao ThenbReturn = True Exit ForElsebReturn = FalseEnd IfNext ...

excel中怎么使用VBA插入一个按钮 使其点击按钮实现在某单元格输入的功能...
步骤如下:1.开发工具,插入,按钮 2.拖动绘制按钮,在弹框中选择,新建 3.在新界面中输入如下代码 4.这样,每次点击按钮,就会在选中单元格中输入内容了

在excel中如何使用VBA插入一个按钮,使其点击按钮实现在表格中单元格输入...
永远都是弄到 查询表的 E1?Sub AA()[AA1] = [AA1] + 1 MsgBox "第:" & [AA1] & "次"Sheets("查询").[E1] = Cells([D1], "a")End Sub

如何在excel中实现点击某个区域跳转指定的区域?
假设你有一个工作簿,其中包含两个工作表:Sheet1和Sheet2。你想在Sheet1的A1单元格中创建一个链接,点击后跳转到Sheet2。选中Sheet1的A1单元格,然后点击“插入”->“超链接”。在“插入超链接”窗口中,选择“当前工作簿中的位置”。在右侧列表中选择Sheet2,然后点击“确定”。现在,当你点击Sheet...

excel中通按钮就可以打开另一个工作表…VBA怎么写?
开发工具(打开excel选项—常用—在功能区显示“开发工具”选项卡)—插入—选择第一个,右击指定宏,插入代码:Public Sub CommandButton1_Click()Sheets("Sheet3").Select ‘sheet3为工作表名 end sub

相似回答