vba excel rename file code example

Example: vba sheets add rename

Sheets.Add
Sheets.Add After:=Sheets("Input")
Sheets.Add After:=Sheets(1)
Sheets.Add Before:=Sheets(2)
Sheets.Add.Name = "NewSheet"						' Add sheet with name

Sheets.Add After:=Sheets(Sheets.Count)				' To end of Workbook	
Sheets.Add(Before:=Sheets(1)).Name = "FirstSheet"	' To beginning of Workbook