如何将 excel 多个工作表中同一区域内的单元格中的数据提取到新工作表,并按顺序依次排列?

2024-11-02 10:14:10
推荐回答(4个)
回答1:

首先提取是要看你提取单元格及内容,来进行判定。

大致分为几点:

  1. 复制粘贴。此类比较繁琐。

  2. 建议使用公式:vlookup;这个提取基数来进行,

  3. 公式=,直接提取。

  4. 录制宏,设置宏的快捷键。一键搞定

     

回答2:

Sub 测试()
Application.ScreenUpdating = False
Dim sht As Worksheet
On Error Resume Next
Set sht = Sheets("汇总")
If Err = 0 Then GoTo 1010
Sheets.Add(after:=Sheets(Sheets.Count)).Name = "汇总"
1010: For Each Sha In Worksheets
If Sha.Name <> "汇总" Then
Sheets("汇总").Range("A" & Sheets("汇总").Range("A65536").End(xlUp).Row() + 1 & ":A" & Sheets("汇总").Range("A65536").End(xlUp).Row() + 9) = Sha.Range("A1:A9").Value
End If
Next
Application.ScreenUpdating = True
End Sub

回答3:

算了,10分 懒得写VBA了,现在看见代码就想吐!

回答4:

你把这个复制过去重新排序不就可以了吗?