The following is part of code. This section of code references a range in the active sheet (f:f). I need the code to reference a range in sheet called "list" but can't figure out to modify code (column is still f:f).

    Do While Sheet1.Cells(r, 4) <> ""
       a = Application.WorksheetFunction.VLookup(Sheet1.Cells(r, 4), Range("f:f"), 1, 0)
        If a <> "" Then