excel

问题描述

精选答案

举例·：一个excel文件，里面有一百多个工作表，但工作表名称没有规则顺序，不是按照sheet1、sheet2这样的顺序排列，现在需要把每个工作表里的A3数据提取出来，组成新的一列。解决方法：用宏自定义函数同时按Alt和F11进入宏界面，点菜单的插入，塻块，粘贴如下代码：Function AllSh(xStr As String, i As Integer)Application.VolatileAllSh = Sheets(i).Range(xStr).ValueEnd Function回到excel，在任意单元格输入＝allsh(

"A3