excel表格中如何按条件自动生成多个新excel

发布网友

我来回答

共4个回答

热心网友

EXCEL中怎样从多个工作表中选出满足条件的所有行,并生成一个新表的解决方法如下：
1、打开要处理的excel文档，
2、按alt+f11，打开vba编辑窗口，
3、双击左侧的this sheet,
4、在右侧的空白中输入下面的程序

Sub liyoushang()
Sheets(Sheets.Count).Cells.ClearContents
k = 1
For i = 1 To Sheets.Count - 1
For j = 1 To Sheets(i).Range("a6000").End(xlUp).Row
If WorksheetFunction.Trim(Sheets(i).Cells(j, 2).Text) = "B" Then 'B指公司名称，在此做相应替换
Sheets(i).Rows(j).Copy _
Destination:=Sheets(Sheets.Count).Cells(k, 1)
k = k + 1
End If
Next
Next
End Sub
5、点击工具栏中的执行，
这样就可以了。

热心网友

用vba,简单说哈方法，宏新建工作表，修改工作表名，宏设置样表，再按名称导入数据

热心网友

可以用VBA做

但你提供的截图不完整，只能给你个示例证明可以做到

已上传附件，适用于excel2007及以上版本

点击按钮即可验证

回答这种描述不清的问题会影响采纳率