Заполните лист Excel из других листов со ссылкой на исходный лист

Question

У меня есть лист с 15 столбцами (AN) и 25 листами (все листы имеют одинаковые столбцы, кроме трех последних, они предназначены для разных выпадающих меню и некоторой информации для пользователя).Я пытаюсь заполнить мастер-лист, ЕСЛИ данные в столбце J иного статуса, как в приведенном ниже коде «Крав».Я хотел бы иметь возможность выбрать, какой статус я хочу получить.

Итак, если в столбце 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 на мастер-листе, которая ссылается на лист, с которого была собрана строка.Это возможно?

Я также хочу выбрать, какой статус я хочу проверить, например «Крав», «Готово», «Работать над этим», «Спрос».Как я могу сделать это простым способом?

Жду вашей помощи :)