Mega Code Archive

 

Categories / VisualBasic Script / Data Type

 

Eliminate the object variable when using With statement

Sub NewWorkbook()          With Workbooks.Add              With .Worksheets.Add(After:=.Sheets(.Sheets.Count))                .Name = "January"                .Range("A1").Value = "Sales Data"              End With              .SaveAs Filename:="YourExcel2007File.xlsx"          End With      End Sub