Good morning everybody

I have 1 Workbooks(result.xls) with a module wich open many dbf files ( other workbooks)
This dbf file contain only one sheet with for name the name of the Workbooks.

I made a loop to save this dbf file and close it
My loop working but I would like to insert the dbf sheet in the workbook (result.xls) before to close it.
but despite a good select Workbooks and sheet ( line 3 ) the activesheet is again the result.xls sheet.

Workbooks(Left(filenam, Len(filenam) - 4) & ".xls").Sheets(1).Select
ActiveWorkbook.SaveAs Filename:=newnam, FileFormat:=xlNormal
Workbooks(Left(filenam, Len(filenam) - 4) & ".xls").Sheets 1).Select
Activesheet.Copy Before:=Workbooks("result.xls").Sheets(1)

How I can change that ?

Thanks in advance
François
PS : sorry for my english