Hi

I've a button on an excel file and clicking on it will copy sheets
from another excel file. The sheets are copied but what happens is
that in the copied sheets, in the formulas, it copies the file name
from where the sheets are copied. Is there any way where I can just
copy the sheets and formulas without copying links? Manually it can be
done by Edit -> Links and specify the current file name. But I want to
do it programatically.
Following is the code which copies the sheets.

Sub GetFile()
   Dim FileName As String
   Dim FilePath As String
   Dim ControlFile As String
   Dim i As Integer
   ActiveWorkbook.Sheets("Loan Information").Select
   FilePath = ActiveWorkbook.Sheets("Loan
Information").range("FilePath").Value
   FileName = ActiveWorkbook.Sheets("Loan
Information").range("FileName").Value
   ControlFile = ActiveWorkbook.Name
   Workbooks.Open FileName:=FilePath & FileName

   For i = 1 To Sheets.Count
       Sheets(Trim(Sheets(i).Name)).Copy
After:=Workbooks(ControlFile).Sheets(Workbooks(ControlFile).Sheets.Count)
       Windows(FileName).Activate
  Next
   Windows(FileName).Activate
   Windows(FileName).Close SaveChanges:=False
   ActiveWorkbook.Save
   Windows(ControlFile).Activate
End Sub

Thanks & Regards
Jignesh Gandhi