如何按条件把一张表格的数据自动生成到另外一张表格

发布网友发布时间：2022-04-20 17:56

共3个回答

热心网友时间：2023-08-04 11:31

假如你的表是这样的，是否需要补货在B列，你先编辑一段宏代码如下：

Sub 自动生成需要补货表()
'
' 自动生成需要补货表
'

'
Rows("1:1").Select
Selection.AutoFilter
ActiveSheet.Range("$A:$B").AutoFilter Field:=2, Criteria1:="需要补货"
Range("A:B").Select
Selection.Copy
Sheets.Add After:=ActiveSheet
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Sheets("Sheet1").Select
ActiveSheet.Range("$A:$B").AutoFilter Field:=2
Application.CutCopyMode = False
Selection.AutoFilter
ActiveWorkbook.Save
End Sub

然后在空白处插入一个按钮，将按钮的制定宏设置为这个“自动生成需要补货表”，最后保存成XLSM格式即可。你的表只是内容多点，你把宏中间的范围改下就行了

热心网友时间：2023-08-04 11:32

联合应用 match和index两个函数，用match找出需要补货的记录，用index取出这些数据，填充到新表中。
具体参数要按自己的要求去完成了。追问额，这两个函数不太会用，之前有同事用宏来计算，就很快

热心网友时间：2023-08-04 11:32

可以私信联系我。