Dim Array() As Workbook??

[Saladsamurai]

WorkbookNames is an array of string, not an array of workbooks.

Use

[vba]

Sub RunMixedMetrics()


Dim MyPath As String
Dim WorkBookNames() As Variant

MyPath = ActiveWorkbook.Path
'Debug.Print MyPath
WorkBookNames = Array("20LW6_TEST_redo.xls")
Workbooks.Open Filename:=MyPath & "\" & WorkBookNames(0)

Workbooks(WorkBookNames(0)).Activate 'THIS LINE FAILS


'Workbooks(WorkBookNames(0)).Save
'Workbooks(WorkBookNames(0)).Close
End Sub
[/vba]

Gracias!