excel中sheet的类似操作如何能简化?急 高分

来源:百度知道 编辑:UC知道 时间:2024/06/05 13:38:11
我要做一个excel文件,其中有一百零三个sheet,从第三个sheet开始每个sheet都各自是一个股票2006年9月29-2007年十月三十日的每日股价,一共一百个股票。数据是我自己网上复制的,我想群操作sheet.
问题1 首先从网站上复制数据后,每个sheet都有固定的几行需要删除。比如sheet1需要删除232 234 235行,sheet2...100都是删除这几行。如何可以一下子删除,而非每个sheet一个个删除

问题2 关于函数

sheet3中的股票比如c3单元格的函数我命令为=(b3-b2)除以b2,如何让每个sheet的c3都能执行这个函数命令(每个sheet,我都需要做大约三十个这样的函数,实在是笨蛋操作累死。。。)

问题3 我的sheet的名称不是单纯的sheet1 2 3而是每个股票的名称,要改回来也相当费时间了。。。怎么办
我的sheet3-100中,复制后的数据日期是相反的,我需要将其按照日期升序排列,但是建立工作组后,降序的那个按钮时灰色的,无法批量操作,包括每个sheet的第一行也无法复制一个,而生成一百个一样的第一行

1.选点击SHEET3,然后按住SHIFT,再点击SHEET103(你的最后一张表),这样就形成了工作组,在标题栏中会有显示.然后你只要按照常规操作删除就行了.

2.和1的操作一样,先形成工作组,然后只要在C3中按照常规操作输入公式就行了

3.是要改回1,2,3...?
在宏代码窗口中输入以下代码,运行,是从第一张表开始改的噢.
Dim a As Integer
Dim b As Integer
a = 1
b = Sheets.Count
Do While a <= b
Sheets(a).Name = "sheet" & a
a = a + 1
Loop

补充:工作组操作不支持排序的.这个没有办法了.在工作组操作上,等同于对所有工作组中的表进行同样的操作.

另觅高人吧:)

这些跟本就不可能同时做