![]() |
Copyingworksheets
I create daily reports with data linked from day to day. Many cells are
protectyed formulas. I'd like to create a macro to copy the current report, creating the next day's base report. |
Copyingworksheets
Simply record a macro while you copy the sheet. Or use code similar to
below. This will copy the sheet, i haven't checked about linked data/ formulas but presume your new sheet would be linked to the sheet 2 days ago. Sub copysheet() Dim thissht Dim newshtname thissht = InputBox("What is the name of the existing sheet you wish to copy?") ActiveWorkbook.Sheets(thissht).Copy Befo=Sheets(1) newshtname = InputBox("What would you like to call the new sheet?") ActiveWorkbook.ActiveSheet.Name = newshtname End Sub |
All times are GMT +1. The time now is 07:55 AM. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com