Копирование значений из нескольких столбцов в другой лист

Question

У меня есть одна рабочая книга, в которой мне нужно скопировать данные из столбцов I, K и M на первом листе в столбец A последнего листа. Ячейки в столбцах I, K и M содержат формулы vlookup. Я пробовал код (показанный ниже), но он копирует формулы, а не значения, возвращаемые этими формулами. Формулы vlookup находятся в строках со 2 по 201 в каждом столбце, но не все из них будут иметь значения для возврата.

Как получить значения для копирования в столбец A последнего листа?

Sub Create_Email_Distro()
'
    ' The following is a list of all the Source worksheets

    Dim PTASK_Template As Workbook ' source WorkBook
        Set PTASK_Template = Workbooks("BCRS Unassigned Tasks Template.xlsm")
    Dim PTASK As Worksheet
        Set PTASK = PTASK_Template.Sheets("BCRS Unassigned Tasks")
    Dim EDLd As Worksheet
        Set EDLd = PTASK_Template.Sheets("Email Distro")

    Application.ScreenUpdating = False
    Application.Calculation = xlCalculationManual

    ' Copy WGM email addresses to Email Distro sheet

    Dim LRWGM As Long
    LRWGM = PTASK.Range("K" & PTASK.Rows.Count).End(xlUp).Row
    Dim EDLRowW As Long
    EDLRowW = EDLd.Cells(Rows.Count, 1).End(xlUp).Row + 1 ' DestinationRow
    PTASK.Range("K2:K" & LRWGM).Copy EDLd.Range("A" & EDLRowW)

    ' Copy SWGM emaill addresses to Email Distro sheet

    Dim LRSWGM As Long
    LRSWGM = PTASK.Range("M" & PTASK.Rows.Count).End(xlUp).Row
    Dim EDLRowS As Long
    EDLRowS = EDLd.Cells(Rows.Count, 1).End(xlUp).Row + 1 ' DestinationRow
    PTASK.Range("M2:M" & LRSWGM).Copy EDLd.Range("A" & EDLRowS)

    ' Copy AGD emaill addresses to Email Distro sheet

    Dim LRAGD As Long
    LRAGD = PTASK.Range("I" & PTASK.Rows.Count).End(xlUp).Row
    Dim EDLRowA As Long
    EDLRowA = EDLd.Cells(Rows.Count, 1).End(xlUp).Row + 1 ' DestinationRow
    PTASK.Range("I2:I" & LRAGD).Copy EDLd.Range("A" & EDLRowA)

    Application.ScreenUpdating = True
    Application.Calculation = xlCalculationAutomatic

End Sub

Я рассмотрел несколько похожих вопросов, но не могу найти тот, который копирует из динамического диапазона и складывает данные из трех столбцов в один.

Пример: