windows(myfile).close not working with 2 files

Hi
I have written a vb macro to open files so that I can compare every file with every other. This leaves me with the files open. When trying to close a file I have successfully used
windows(myfile1).close
my problem is that when trying to close the other file that is open I get an error after using
windows(myfile2).close

Hope you can help

kevin

Hi

Still having problems with the line Workbooks(myfile2).Close below.

It does close the file but then brings up an error.


Sub CoV()

mypath = Range("B3")
rightdistance = 7
rightcount = rightdistance
verticaldistance = 2

NxF1:
Windows("CoVariance.xlsm").Activate
Application.ScreenUpdating = False
xaxisname = Cells(1, rightcount).Address
yaxisname = Cells(verticaldistance, 6).Address
myfile1 = Range(xaxisname)
myfile2 = Range(yaxisname)
Workbooks.Open Filename:=mypath & myfile1
Workbooks.Open Filename:=mypath & myfile2
Windows("CoVariance.xlsm").Activate
Cells(verticaldistance, rightcount).Formula = "=PEARSON(" & myfile1 & "!$F$1:$F$1000," & myfile2 & "!$F$1:$F$1000)"

Workbooks(myfile1).Close

Workbooks(myfile2).Close

rightcount = rightcount + 1


If rightcount = 10 Then
'Workbooks(myfile1).Close

Application.ScreenUpdating = True
verticaldistance = verticaldistance + 1
rightdistance = rightdistance + 1
rightcount = rightdistance


If verticaldistance = 5 Then

Exit Sub

End If
End If

GoTo NxF1
Application.ScreenUpdating = True
'Windows(myfile1).Close
End Sub