Sub CreateFile ( ) If fso.FileExists(wbAddr + “Output.xls”) Then Set wkOut = Workbooks.Open(wbAddr + “Output.xls”) Set wkOut = Workbooks(“Output.xls”) wkOut.Close fso.DeleteFile wbAddr + “Output.xls” End If Set wkOut = Workbooks.Add wkOut.SaveAs filename:=wbAddr + “Output.xls” Set wkOut…
Tag: Workbooks.Open
VBA Code To Create An excel File
Sub CreateNewFile () Dim wkOut as Workbook Dim wbAddr as string Dim fso ‘wbAddr holds the path where the file needs to be created ‘like wbAddr=”D:\VbaCodes” Set fso = CreateObject(“Scripting.FileSystemObject”) Set wkOut = Workbooks.Add ‘Output.xls is the file to be…