我有一个包含15列(A-N)和25张工作表的工作表(除了最后三列,所有工作表都具有相同的列,它们用于不同的下拉菜单和一些用户信息)。如果列J ic中的数据处于特定状态,我将尝试填充主表,例如下面的代码“ Krav”。我希望能够选择我想要收集的身份。
因此,如果列J包含特定状态,则整行将被复制到名为“主”的工作表中。这必须在每张纸上的每一行上完成。
到目前为止,这是我的代码(在主表上有一个名为“ VisAlleKrav”的按钮):
Private Sub VisAlleKrav_Click()
Dim i As Integer
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
If ws.Name <> "Master" Then
With ws
.Range("A1", ws.Range("N600").End(xlUp)(2)).AutoFilter 10, "Krav"
End With
ws.Range("A2", ws.Range("N" & Rows.Count).End(xlUp)(2)).Copy Ark23.Range("A65536").End(xlUp)(2)
ws.AutoFilterMode = False
End If
Next ws
End Sub
这可以正确地填充我的母版表,但是当该表完成填充数据时出现错误,我认为这与最后的三张表有关,后者与其他表不相等。
但是,这是我的问题。我还希望母版工作表的B列中有一个链接,该链接可以链接回收集行的工作表。那可能吗?
我还想选择要检查的状态,例如“ Krav”,“完成”,“正在处理”,“需求”。我如何轻松地做到这一点?
期待您的帮助:)