マクロで選択した図形の選択状態を解除するには

質問

Excel97,Windows98SEを使用しています。

シート上に作成したコントロールツールのコマンドボタンをクリックすると、
シート上の全ての図形を選択して、順序を最背面にするというマクロを作成したのですが、
選択した図形のハンドルが消えません。
図形選択を解除して、B26セルを選択したいのですが、どうしたらよいでしょうか？

Private Sub CButton_gyou_Click()
ActiveSheet.DrawingObjects.Select
Selection.ShapeRange.ZOrder msoSendToBack
Range("B26").Select
End Sub

ご存知の方、どうぞよろしくお願いいたします。

回答No.1

wildcard · ベストアンサー

コントロールツールのコマンドボタンをクリックすると、そのクリックしたコマンドボタンにフォーカスが移ってしまうのが原因かと…
これではどうでしょうか？

Private Sub CButton_gyou_Click()
Range("B26").Select
ActiveSheet.DrawingObjects.Select
Selection.ShapeRange.ZOrder msoSendToBack
Range("B26").Select
End Sub

お礼

早速のご回答ありがとうございます！
上手くできました！
フォーカスが移動するなんて考えつきませんでした…。
またわからないことがありましたらよろしくお願いいたします。