如何从多个工作表的固定位置取数呢
有时工作的需要,我们要合并统计多个工作表的数据,那 么怎么从多个工作表的固定位置取数据呢?今天小编和大家分享一下。

2、第二步,点击工具——宏——Visual Basic 编辑器——点击插入——模块,在模块那里输入如下代码:Sub 固定提取()Application.ScreenUpdating = FalseDim x For x = 1 To Sheets.Count With Sheets("合并表") If Sheets(x).Name <> "合并表" Then Sheets(x).Range("A2:b2", "a3:b3").Copy .Range("a" & .[a65536].End(xlUp).Row + 1) ' Range("A2:b2", "a3:b3")是固定单元格区域。 End With Next xEnd Sub然后运行代码就可以了。

2、接着打开Visua Basic编辑器(按AL哌囿亡噱T+F11)——然后插入模块——在模块那里输入如下代码:Sub 固定列提取()Application.ScreenUpdati荏鱿胫协ng = FalseDim x For x = 1 To Sheets.Count With Sheets("合并表") If Sheets(x).Name <> "合并表" Then Sheets(x).Range("A2:b" & Sheets(x).[a65536].End(xlUp).Row).Copy .Range("a" & .[a65536].End(xlUp).Row + 1) ' Range("A2:b" & Sheets(x).[a65536].End(xlUp).Row)是固定列区域。 End With Next xEnd Sub

2、右击命令按钮——属性——在Caption属性那里输入:固定提取(就是给命令按钮重命名)
