Bernardstanislas
5/13/2015 - 8:30 AM

output.vb

On Error Resume Next
Sheets("Output").Delete
Sheets.Add After:=Sheets(Sheets.Count)
Set outputSheet = Sheets(Sheets.Count)
outputSheet.Name = "Output" 'name it "output"