作者:乔山办公网日期:
返回目录:excel表格制作
用宏可以解决。同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴636f7079e799bee5baa6363如下代码:
Sub test()
Dim i As Integer
For i = 1 To Sheets.Count
Sheets(i).Select
If i < Sheets.Count Then
ActiveSheet.Shapes.AddShape(msoShapeActionButtonForwardorNext, 105, 5, 30, 20).Name = i & "Next"
ActiveSheet.Hyperlinks.Add ActiveSheet.Shapes(i & "Next"), "#" & Sheets(i + 1).Name & "!A1"
End If
ActiveSheet.Shapes.AddShape(msoShapeActionButtonHome, 55, 5, 30, 20).Name = i & "Home"
ActiveSheet.Hyperlinks.Add ActiveSheet.Shapes(i & "Home"), "#" & Sheets(1).Name & "!A1"
If i > 1 Then
ActiveSheet.Shapes.AddShape(msoShapeActionButtonBackorPrevious, 5, 5, 30, 20).Name = i & "Pre"
ActiveSheet.Hyperlinks.Add ActiveSheet.Shapes(i & "Pre"), "#" & Sheets(i - 1).Name & "!A1"
End If
Next i
End Sub
在此界面直接按F5运行此宏,完成。
假设在百excel工作薄的任意工作表中加上“返回”标记,并能在鼠标点击后自动返回至工作表:“客户档(总)”
1、在任意工作表中选择一个单元格,输入:返回,并给单元格填入颜色,
见图一
2、右键点击这个单元格,在跳出的菜单中选择“超级链度接”
见图二
3、在跳出的“超级链接”对话框中,右面选择:本文档中的位置;左面选中:客户档(总),然后点击确定
见图三
4、这个单元格中的字内符下面自动加上了下划线,当鼠标移动至该单元格是,鼠标会变成手的形态。
见图四容
这时用鼠标单点击这个单元格,将会自动返回工作表“客户档(总)”
首先在“百文件”菜单下找到“选项”按钮,打开Excel选项设置窗口2其次选择“自定义功能区”,在这里自度定义您的Excel菜单DIY3在主选项卡中单击右键,调出右键菜单,选择“添加新选知项卡(道W)”4然后个性重命名您的自定义菜单名称,同样是右键实现5您可以为您的菜单自定义一个个性十足的名称,此处我们专设成“我的Excel DIY”6最后属您就可以为您的菜单添加你常用的功能了
假设在excel工作薄的任意工作表中加上“返回”百标记,并能在鼠标点击后自动返回至工作表:“客户档(总)” 1、在度任意工作表中选择一个单元格,输回入:返回,并给单元格填入颜色, 见图一 2、右键点击这个单元格,在跳出的答菜单中选择“超级链接” 见图二...