Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Programically remove code from a worksheet
I have a workbook that I need to copy a particular sheet out to save in a
separate workbook. This part is done and works. The worksheet has an Activate piece that shows a user form. When I copy the worksheet into its own workbook, programically, the code comes with it. When the sheet is activated in the new workbook the code erros out because the user form is not copied over with it, the userform is not needed in the new workbook. How can I programically removed the Worksheet_Activate code when the worksheet is programically copied out? Thanks for any help -- Stephen |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Programically remove code from a worksheet
hi
see this site http://cpearson.com/excel/vbe.aspx make note of the warning. Regards FSt1 "Stephen sjw_ost" wrote: I have a workbook that I need to copy a particular sheet out to save in a separate workbook. This part is done and works. The worksheet has an Activate piece that shows a user form. When I copy the worksheet into its own workbook, programically, the code comes with it. When the sheet is activated in the new workbook the code erros out because the user form is not copied over with it, the userform is not needed in the new workbook. How can I programically removed the Worksheet_Activate code when the worksheet is programically copied out? Thanks for any help -- Stephen |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Programically remove code from a worksheet
You may be happier copying and pasting the data vs. trying to delete the code.
I avoid writing code that alters code if at all possible. If you must/want/have to do that then Chip Pearson's website has instructions... http://www.cpearson.com/excel/vbe.aspx Alternatively, something like the following can be used... '-- Sub PutErThere() Dim rng As Range 'Find the bottom right cell Set rng = ThisWorkbook.Worksheets _ ("Sludge").Cells.SpecialCells(xlCellTypeLastCel l) 'Establish the range to copy Set rng = ThisWorkbook.Worksheets _ ("Sludge").Range("A1", rng) 'Copy and paste rng.Copy _ Destination:=Workbooks("NewBook").Worksheets(1).Ra nge("A1") 'Clean up Application.CutCopyMode = False Set rng = Nothing End Sub -- Jim Cone Portland, Oregon USA "Stephen sjw_ost" wrote in message I have a workbook that I need to copy a particular sheet out to save in a separate workbook. This part is done and works. The worksheet has an Activate piece that shows a user form. When I copy the worksheet into its own workbook, programically, the code comes with it. When the sheet is activated in the new workbook the code erros out because the user form is not copied over with it, the userform is not needed in the new workbook. How can I programically removed the Worksheet_Activate code when the worksheet is programically copied out? Thanks for any help -- Stephen |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
programically refresh pivot chart formatting | Excel Programming | |||
Problem with Updating Add-in path programically | Excel Programming | |||
Remove VBA code behind a worksheet | Excel Programming | |||
How do you programically remove carriage returns within a cell | Excel Programming | |||
remove code from behind worksheet | Excel Programming |