Use a master list to run a macro that opens, extracts, and closes multiple workbooks

[snb]

Sub M_snb()
  sn=sheet1.range("A1:A100")

  for each it in sn
    sheets.add(,sheets(sheets.count),,"G:\OF\" & it & ".xlsx"
  next
End Sub

Why do you provide too little information to answer your question adequately?