title: ActiveChart.Deselect doesn't work
body: <p>I create an xy scatter chart from three columns of data -- see data sample and code below.  The code is run from an add-in, and <em>not</em> from the active workbook</p>
  
  <p>After putting <code>SeriesCollection(1)</code> onto the secondary axis, that charted line is selected.
  According to Excel 2007 HELP, <code>ActiveChart.Deselect</code> should deselect everything.  But it did nothing when added to my code.  <code>.Deselect</code> is listed in the Object Model Changes since Office XP as a method of the Chart Object, with a status of <code>hidden</code>.</p>
  
  <p>I have found a variety of suggestions, including selecting some cell; or using SendKeys to send {ESC}.  The only method that seemed to work was to first enable screenupdating, and then protect the chart.  (The unprotect after is not necessary to remove the selection, but convenient for further work).</p>
  
  <p>Is there a better method, or this a reasonable work-around?</p>
  
  <p>Does <code>Chart.Deselect</code> work in other versions of Excel?</p>
  
  <p>The final result should be that the chart will be visible on the screen, with nothing selected.</p>
  
  <p><strong>Short data sample</strong></p>
  
  <pre><code>Time                    Amps    Volts
  04/26/2015 01:22:39 PM  4.9     53.4
  04/26/2015 01:22:40 PM  -0.9    53.2
  04/26/2015 01:22:41 PM  -1.5    53.4
  04/26/2015 01:22:42 PM  8.7     53.4
  04/26/2015 01:22:43 PM  -2.9    53.3
  04/26/2015 01:22:44 PM  -3.2    53.2
  04/26/2015 01:22:45 PM  11.3    53.8
  04/26/2015 01:22:46 PM  -3.8    53.3
  04/26/2015 01:22:47 PM  -3.2    53.3
  04/26/2015 01:22:48 PM  11.4    53.6
  04/26/2015 01:22:49 PM  -3.2    53.3
  04/26/2015 01:22:50 PM  -2.8    53.2
  04/26/2015 01:22:51 PM   5.7    53.3
  04/26/2015 01:22:52 PM   7.5    53.5
  04/26/2015 01:22:53 PM   2.1    53.3
  04/26/2015 01:22:54 PM   2.3    53.4
  04/26/2015 01:22:55 PM   2.5    53.3
  04/26/2015 01:22:56 PM   2.4    53.4
  04/26/2015 01:22:57 PM   2.3    53.4
  04/26/2015 01:22:58 PM   1.9    53.5
  04/26/2015 01:22:59 PM   2      53.3
  04/26/2015 01:23:00 PM   2.3    53.3
  04/26/2015 01:23:01 PM   2.7    53.5
  04/26/2015 01:23:02 PM   2.5    53.4
  04/26/2015 01:23:03 PM  -2.4    53.4
  04/26/2015 01:23:04 PM  -4      53.3
  04/26/2015 01:23:05 PM  -3.5    53.3
  04/26/2015 01:23:06 PM   4.1    53.4
  04/26/2015 01:23:07 PM   9.4    53.6
  04/26/2015 01:23:08 PM  -5.1    53.3
  04/26/2015 01:23:09 PM   9.8    53.6
  04/26/2015 01:23:10 PM  -5.2    53.2
  04/26/2015 01:23:11 PM   9.7    53.5
  04/26/2015 01:23:12 PM  -5.5    53.2
  04/26/2015 01:23:13 PM   9.8    53.6
  </code></pre>
  
  <p>Using this code:</p>
  
  <pre><code>Sub GraphEmeter()
      Dim cS  As Chart
      Dim A As Axis
  
  Application.ScreenUpdating = False
  
  Set cS = ActiveWorkbook.Charts.Add
  Set cS = ActiveChart
  With cS
      .SetSourceData Range("capture!R1").CurrentRegion, xlColumns
      .ChartType = xlXYScatterLinesNoMarkers
      Set A = .Axes(xlCategory)
      With A
          .CategoryType = xlCategoryScale
          .BaseUnitIsAuto = True
          .TickLabels.Orientation = 45
      End With
      .SeriesCollection(1).AxisGroup = 2
  
      'deselect the chart area
      'documented method 
      '            ActiveChart.Deslect
      'doesn't seem to work
  
      'But this method does
      Application.ScreenUpdating = True
      .Protect
      .Unprotect
  
  End With
  End Sub
  </code></pre>