I run this code daily that will affect each .xlsx workbook in the directory, but how can I ignore the workbook if the file name is not in the "Okay" array?

This is my current syntax:

```
Option Explicit
Public Sub OpenExcelInDir()
Dim MyFolder As String
Dim MyFile As String
    MyFolder = "C:\ExcelSheets"
    MyFile = Dir(MyFolder & "\*.xlsx")
    Do While MyFile <> ""
        Workbooks.Open Filename:=MyFolder & "\" & MyFile
        MyFile = Dir
        Call UpdateAllSheets
    Loop
End Sub

```

Now I want to alter it so that I can declare a string array and only open the workbooks in the array something like so:

```
Dim goodWB() As String
goodWB= Split("ABC123,DEF456,GHI789", ",")

```