Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Renaming a copied sheet programatically
Hi.
I have an Excel spreadsheet with tabs named as Week Numbers. I'm using VBA in MS Access to copy the previous week's sheet if one for the current week doesn't exist. I can copy the sheet but it's given the name (for example) "822 (2)". How do I select the new sheet in order to rename it "823"? Here's the bit of code in question. Many thanks. Keith. If libSheetExists(objWkb, objSht, strWeekNo) = False Then Dim strLastWeek As String strLastWeek = strWeekNo - 1 Set objSht = objWkb.Worksheets(strLastWeek) 'Select the previous week's sheet objSht.Activate objSht.Copy After:=Sheets(strLastWeek) 'HOW DO I SELECT THE NEW WORKSHEET? objSht.Name = strWeekNo End If |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
copied formulas refer to destination sheet not source sheet | Excel Worksheet Functions | |||
renaming copied worksheets deleting .xls] | Excel Worksheet Functions | |||
Setting sheet.xlt for a workbook programatically | Excel Programming | |||
Programatically sending a sheet through Outlook | Excel Programming | |||
Programatically Breaking Links of Copied Chart Sheet | Excel Programming |