Excel VBA Macro

Question

Список: - «Лист проблем» (рабочий лист).

У меня есть лист Excel, в котором представлен список проблемных вопросов (строк), размер которых меняется каждый день (например, больше или меньше строк); Каждой строке было присвоено имя; Назначенное имя всегда находится в том же столбце «M» «Листа проблем»; Имя отдельного назначения не обязательно появляется каждый день или может встречаться несколько раз (более чем в одной строке) в определенный день;

У меня уже есть макрос, который создает уникальный список (рабочий лист) имен присвоений, в котором каждое имя, указанное в столбце M Листа проблем, записывается один раз в рабочий лист «Уникальный список»; Этот же макрос создает одну новую рабочую таблицу (в той же рабочей книге) для каждого уникального вхождения имени назначения. Имя назначения автоматически записывается на новой отдельной вкладке листа.

Требуется: - Макрос, который будет проверять столбец M основного «Листа проблем»; Для каждой строки / проблемы, где определенное имя назначения встречается в столбце M Листа проблем, сопоставьте имя назначения с рабочим листом с тем же именем, затем скопируйте и вставьте детали всей строки из «Листа проблем» в первый пустая строка правильного (с таким же присвоенным именем) листа в существующей книге. Эту процедуру необходимо повторить для каждой строки в Листе проблем.

Answer 1

Если заказ не имеет значения, это может быть вашей лучшей ставкой

Sub x()
    Dim rngProbs As Range
    With ThisWorkbook.Worksheets("Problem Sheet")
        Set rngProbs = .Range("M1", .Range("M1").End(xlDown))
    End With

    Dim r As Range


    For Each r In rngProbs
        r.EntireRow.Copy
        ThisWorkbook.Worksheets(r.Text).Rows(1).EntireRow.Insert
    Next r

End Sub