高效建立Excel 2000工作表

jsy165

高效建立Excel 2000工作表

    当用户在Excel中新建工作簿时，系统的默认设置是在工作簿中建立三张空白工作表，如果用户需要建立多张工作表时，就可以采用下面的操作方法来快速新建工作表。



一、修改选项设置法



如果用户在设计工作簿时，能够明确地知道需要使用的工作表数量，这时就可以通过修改“选项”设置中的相应设置来解决。



例如用户需要在工作簿中使用100张工作表，只需启动Excel程序，然后单击“工具”菜单下“选项”命令，在“选项”对话窗口中单击“常规”标签卡，将“新工作簿中工作表数”由3修改成100（最大可以设为255）。然后单击工具栏上“新建”按钮，此时新建的工作簿中就包含有100张空白工作表。



如果用户不是经常需要使用50张工作表来工作的话，记得在建立好工作表后将“选项”中的设置修改回来，否则你每次新建Excel工作簿时，都会建立50张空白工作表。



二、插入法



当用户在使用一个已经包含有数据工作表的工作簿时，如果需要在工作簿中增加多张空白工作表，用户可以通过单击“插入”菜单下“工作表”命令的方法来插入新的空白工作表。

使用此方法，一次只能插入一张工作表，但如果你采用如下的技巧则可以一次插入多张工作表，按住SHIFT键，同时用鼠标单击并选定与需要添加工作表数目相同的工作表标签，然后单击“插入”菜单下的“工作表”命令。



例如我们需要在工作簿中新增三张工作表，这时只要按住SHIFT键，同时用鼠标在工作表标签位置处选定三张工作表标签，单击插入“”菜单下的“工作表”命令即可同时插入三张工作表。



三、移动法



当用户在使用一个已经包含有数据工作表的工作簿时，如果需要在工作簿中增加的工作表数量相当多，而工作簿中原有的工作表数量又比较少时，使用插入法新建工作表也是比较麻烦的事情。这时可以采用移动工作表的方法来解决问题。



例如原工作簿中有三张包含数据的工作表，用户需要在工作簿中再增加50张工作表，这时就可使用如下操作方法：



1、利用修改选项设置法建立一个包含有50张空白工作表的新工作簿，假定工作簿名称为“2.XLS”。



2、切换到包含有三张数据工作表的原工作簿，将这三张数据工作表同时选定。



3、在“编辑”菜单中单击“移动或复制工作表”命令，打开“移动或复制工作表”对话窗口。



4、在“工作簿”下拉列表框中，单击选定用来接收工作表的工作簿“2.XLS”。



5、在“下列选定工作表之前”列表框中，单击需要在其前面插入移动工作表的工作表，假如要在Sheet1之前插入移动工作表，则单击Sheet1工作表。



6、单击“确定”按钮，原工作簿中的三张数据工作表则移动到新的工作簿（2.XLS）中去了。

使用此方法需要注意的是，当原工作簿中的三张数据工作表名称与新工作簿中的工作表名称相同时，原工作簿中的三张数据工作表名称后自动增加“(2)”字样，如果工作表移动后，工作表中的计算公式有误，请检查是否与名称更改有关，如是则将名称修改正确。



四、宏命令法



通过编制和运行宏命令，用户可以非常方便地实现在工作簿中新建任意数量工作表的工作。下面就向大家介绍在工作簿中新建任意数量工作表宏命令的具体操作方法：



1、选择“工具”菜单下“宏”项目中“宏”命令。



2、在“宏名”输入框中录入自定义宏名称“自动增加工作表”，然后单击“创建”按钮。



3、进入宏命令编辑窗口，在Sub 自动增加工作表()命令后依次键入如下宏命令内容：



Dim i&, userinto

i = 0

userinto = InputBox("输入插入工作表数量：")

If IsNumeric(userinto) = True Then

Do Until i = userinto

Worksheets.Add

i = i + 1

Loop

End If

End Sub

4、宏命令编辑完成后，将其保存，关闭宏命令编辑窗口。



当用户需要在工作簿中新建我作表时，选择“工具”菜单下“宏”项目中“宏”命令，打开“宏”对话窗口，在“宏”命令列表框中选择“自动增加工作表”宏，然后单击“执行”按钮，此时弹出一个“输入插入工作表数量”的对话框，输入你想要新建的工作表数量，单击“确定”按钮，Excel立即在工作簿中新建用户指定数量的工作表。



作者：不详