VB code for newest sheet

Heya All,

I currently have this code:

ActiveCell.Columns("A:M").EntireColumn.Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet30").Select
ActiveCell.Offset(0, 1).Range("A1").Select
ActiveSheet.Paste

but instead of "Sheets("Sheet30").Select" i want it to be the newest sheet
any ideas??

If you're not going to rename your sheets. Try this

Please Login or Register  to view this content.

.

If the you want the last sheet you can use Sheets(Sheets.Count).Select. If your last sheet is not your newest sheet and you really need the newest sheet, you need a permanent store (like a cell) to store the index of the last sheet created.

The following code should be pasted in the workbook object module. you must have a sheet (preferably hidden) with code name MetaDataSheet and in the sheet a cell named LatestSheetIndex

Please Login or Register  to view this content.

You can then use Sheets(MetaDataSheet.Range("LatestSheetIndex")).Select