LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming,microsoft.public.office.developer.vba
external usenet poster
 
Posts: 19
Default Delete Worksheet on DeActivate

Hello All,

I have a worksheet that is created at run-time that displays just some
temporary graphs to the user. I would like to delete this worksheet once
the user changes focus back to another sheet in the workbook.

My original idea was to hook in an event handler for the
Worksheet_DeActivate event. The code looked like (don't have the exact
code with me, but the idea):

[Public Class Module clsWks]
Public WithEvents oWks As Excel.Worksheet

Private Sub oWks_DeActivate()
DeleteWorksheet
'OR
'Me.oWks.Delete
End Sub


[Module TestClass]
Dim gWksCol as New Collection

Private Sub CreateSheet()
Dim oWksEvts As clsWks

Set oWksEvts = New clsWks
Set oWksEvts.oWks = Worksheets.Add

...

gWksCol.Add oWksEvts
End Sub

Sub DeleteWorksheet()
gWksCol(1).oWks.Delete
gWksCol.Remove 1
End Sub

The code craps out with a run-time error both when calling
DeleteWorksheet or Me.oWks.Delete in the DeActivate event. I think this is
beacuse the delete method seems to re-fire the DeActivate event on the
worksheet which has already been deleted.

Is there a better way to delete a worksheet when it is no longer the
ActivateSheet? Is it better to hook into the WorkBook_SheetChange event,
or is this the correct path and I've just done something silly?

Thanks,
TJ Walls
Ph.D. Candidate - Dept of Physics, Stony Brook University
 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
delete value on worksheet 2 that match values on worksheet 1 np Excel Discussion (Misc queries) 0 December 10th 09 06:02 PM
pivot chart causes worksheet to deactivate J Owen Excel Discussion (Misc queries) 2 January 22nd 07 07:32 PM
How to delete a duplicate Excel worksheet within that worksheet? jozawun Excel Discussion (Misc queries) 6 September 19th 06 02:20 PM
Deactivate worksheet Cordobes Excel Discussion (Misc queries) 3 December 4th 05 10:16 AM
Deactivate web toolbar Anita Excel Discussion (Misc queries) 1 January 19th 05 12:46 AM


All times are GMT +1. The time now is 05:51 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"