I suspect that you can probably do what you want with some amount of
event / Win API programming.  However, as pointed out in the response
to the same question from yesterday, a non-programmatic solution
requires a single keystroke -- use of the Delete button.

Marc -

Without blowing up my machine with APIs, I thought some kind of
application or chart event might help.

Application events: there are WindowActivate and WindowDeactivate
events, but the Chart Window is not recognized as a window by the event
handler.

Chart events: the Chart_Activate event fires when you click on the chart
(which you must do before activating the chart window, or non-window),
then nothing when the chart window is opened.  When the chart window is
closed (by the X or by clicking somewhere else on the screen), you get a
Chart_Deactivate event followed immediately by a Chart_Activate event.
If you do something clever like Ctrl-Tabbing or selecting another
workbook from the Windows menu, you get a Chart_Deactivate, followed by
the other workbook's window activating, but when you switch back to the
workbook with the chart, you get another Chart_Activate.  It seems hard
to me to distinguish between a fatal window close (using the X) and a
benign window close (just clicking somewhere in the worksheet).  If you
always want to kill the chart when the chart window is closed, then it
doesn't matter, just set a dummy variable when the Chart_Deactivate
happens, and if it's followed right away by the same chart activating,
then kill the chart.

When the X is clicked (or the chart window closes), the chart is still
selected.  Couldn't the user just delete the chart?  What is the purpose
of using the chart window to show the chart?  If the window is shown in
code, maybe you could at the same time create a dummy command bar with
one button, which when pressed kills the chart, then removes the command
bar.

- Jon
-------
Jon Peltier, Microsoft Excel MVP
http://www.geocities.com/jonpeltier/Excel/index.html
_______

I have figured out what I wanted to do. I needed to trap an event for
the chart: the Deactivate event. This works for me. The chart will be
deleted if anything but the chart is clicked. Clicking on the chart
window's 'X' button does it, and so does clicking outside the chart,
ie., a cell.

In a class module that I named clsChartEvents, I have placed the
following:
==========================================================================
Option Explicit
Public WithEvents Embedded_Chart As Chart
Private Sub Embedded_Chart_Deactivate()
   ActiveSheet.ChartObjects.Delete
End Sub
==========================================================================
In the regular module that contains the chart making code, I placed
this (the Sub is called from the chart making code):
==========================================================================
Public Click As New clsChartEvents
Sub Enable_chart_events()
   Set Click.Embedded_Chart =
ThisWorkbook.Worksheets("Sheet2").ChartObjects(1).Chart
End Sub
==========================================================================

=====================================================================