小李是公司会计，每天需要处理的Excel工作表多达几十个，数量非常大。为了方便工作，小李需要在Excel工作簿中创建目录，这个目录包含超链接，点击即可进入对应的工作表，如果工作簿中的工作表出现了什么变化，也可以快速更新。
　　其实，这个要求通过Excel的宏命令就可以完成，因为不同表格的作簿的具体情况不同，下面给出一段经典宏代码，小李可以根据实际的需求修改。
　　Excel宏代码片段：
　　Private Sub Worksheet_Activate()
　　Dim sh As Worksheet
　　Dim a As Integer
　　Dim R As Integer
　　//在目录工作表激活时，自动创建工作簿中除“目录”工作表外所有工作表的目录
　　R = Sheet1.[A65536].End(xlUp).Row
　　a = 2
　　If Sheet1.Cells(2， 1) <> ＂＂ Then//判断是否存在工作表目录
　　Sheet1.Range(＂A2:A＂ & R).ClearContents
　　End If
　　For Each sh In Worksheets
　　If sh.CodeName <> ＂Sheet1＂ Then
　　Sheet1.Cells(a， 1).Value = sh.Name
　　a = a + 1
　　End If
　　Next
　　End Sub
　　提示：由于该功能是通过编辑宏代码实现的，因此一定要把编辑的工作簿以“Excel启用宏的工作簿(*.xlsm)”格式保存才行。下一次重新打开此工作簿时会警告宏已被禁用，单击警告栏中的“启用内容”即可。

索尼RX100支持自拍吗索尼RX100支持自拍，2。5张秒，高速模式为10张秒。索尼RX100配备了一块3。0英寸约123万像素XtraFine液晶屏，该液晶屏采用了TruBlackldquo纯黑rdqu索尼RX100支持防抖吗索尼RX100支持光学防抖。索尼RX100配备了一块3。0英寸约123万像素XtraFine液晶屏，该液晶屏采用了TruBlackldquo纯黑rdquo技术，亮度具有自动手动（5索尼t1多少钱索尼t1详细评测图文索尼t1是一款2003年上市的老式数码相机，索尼t1在外观上没有现在的数码相机好看，而且略显厚重和笨拙。索尼t1现在的市场地位就好比是七八十年代的笨蛋相机，比较过时。但是索尼t1对索尼RX1焦距如何索尼RX1不可更换镜头，配备了卡尔bull蔡司SonnarT35mmF2镜头，等效焦距为35mm（32），37mm（169），实际焦距为35mm。索尼RX1采用了一块3。0英寸约1索尼rx1评测看这里图解现在喊ldquo索尼大法好rdquo的人越来越多了，毕竟索尼的黑科技可是有很多的，尤其是在这相机方面，作为第一个把全画幅放在了微单上的相机厂家，索尼可谓是赚足了风头，即把单反做到了索尼rx1怎么样经典机型给你酷炫体验图解还没接触过单反相机之前，就听过这么一句话rdquo单反穷三代ldquo，这句话也强烈说明了单反相机相对价格较高，不过相较于单反相机拍出来的各种大片来说，高投入，高产出。在大家耳熟能索尼RX1的快门速度是多少索尼RX1的快门速度是3012000秒。索尼RX1采用了一块3。0英寸约123万像素XtraFine液晶屏，该液晶屏采用了WhiteMagic技术，亮度具有自动手动（5档）晴朗天气索尼RX1分辨率是多少索尼RX1最大分辨率是6000times4000像素。索尼RX1采用了一块3。0英寸约123万像素XtraFine液晶屏，该液晶屏采用了WhiteMagic技术，亮度具有自动手动（索尼RX1的ISO是多少索尼RX1的ISO是10025600，可限定上下值。索尼RX1采用了一块3。0英寸约123万像素XtraFine液晶屏，该液晶屏采用了WhiteMagic技术，亮度具有自动手动（5索尼RX1的连拍速度是多少索尼RX1支持连拍，连拍速度是5张秒。索尼RX1采用了一块3。0英寸约123万像素XtraFine液晶屏，该液晶屏采用了WhiteMagic技术，亮度具有自动手动（5档）晴朗天气等索尼RX1取景器类型是什么索尼RX1取景器类型是光学取景器，电子取景器。索尼RX1采用了一块3。0英寸约123万像素XtraFine液晶屏，该液晶屏采用了WhiteMagic技术，亮度具有自动手动（5档）晴