title: Refocus on cells after losing focus on activex control
body: <p>I have a worksheet (called Control) with a range of cells, each overlaid with a shape:</p>
  
  <pre><code>Set shp = Sheet1.Shapes.AddShape(msoShapeFlowchartTerminator, cl.Left + 2, cl.Top + 1.5, 52, 12)
  </code></pre>
  
  <p>and then a hyperlink added to the shape to allow for screen tips:</p>
  
  <pre><code>Sheet1.Hyperlinks.Add Anchor:=shp, _
      Address:="", _
      SubAddress:="'Control'!" &amp; cl.Address, _
      ScreenTip:=shp.name, _
      TextToDisplay:=" "
  </code></pre>
  
  <p>This prevents the shape's onaction from working, but instead, the worksheet SelectionChange event is triggered on the object in SubAddress.</p>
  
  <p>Also on the sheet is a set of activex controls to modify the behaviour of the code. One such control is a checkbox, and as expected, when I click the checkbox, the rest of the sheet loses focus (toolbar items greyed out and cell border absent). When I next click a cell (shape), the toolbar items revert to colour, but I have to click the cell again to select it.
  I have tried reactivating the previously selected cell after every click of the activex control as follows:</p>
  
  <pre><code>Private Sub checkbox1_Click()
      previousTarget.Application.ActiveCell.Activate
  End Sub
  </code></pre>
  
  <p>and this works fine - I can click any cell and it will be selected. However, I also have an activex textbox control, and the same technique will not work in this case as the textbox needs to retain focus until another item is clicked.</p>
  
  <p>I've determined that all this works if not using hyperlinks, so just wondering if there could be any resolution, or I have to abandon my tool tips (or accept 2 clicks to select a cell after entering text in the textbox).</p>