I currently have a macro, which I recorded, that copies a column from sheet ("FinCen") and pastes it into a specific column in sheet ("ALL"). There are about 10 columns that I want to copy and paste, which takes a while because it does each one after the other. Is there a way to put them in an array and loop through to make the process run faster? A bit of the code is below.

    Columns("K:K").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("ALL").Select
    Range("B2").Select
    ActiveSheet.Paste Link:=True
    Sheets("FinCen").Select
    Columns("AI:AI").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("ALL").Select
    Range("C2").Select
    ActiveSheet.Paste Link:=True
    Sheets("FinCen").Select
    Columns("L:L").Select
    Application.CutCopyMode = False
    Selection.Copy
    Sheets("ALL").Select
    Range("D2").Select
    ActiveSheet.Paste Link:=True
    Sheets("FinCen").Select