スキルアップ・問題解決なら、モーグにおまかせ！

クイックアクセスバーには「行の高さ・列の幅」は登録しているのですが、
試しにシート上のコマンドボタンからの実行してみると
Private Sub CommandButton1_Click()
   Application.Dialogs(xlDialogRowHeight).Show
End Sub
コマンドボタンクリック前に選択していたセル範囲が解除されてしまいます。
コマンドボタンからも調整できるようにしたいのです。
解決方法があればよろしくお願い致します。
 

私の環境(Excel2019,Win10)では、
・ActiveXコントロール
   範囲の選択状態は解除されるものの、その範囲に対して行高調整がされる。（実質的影響なし）
   複数行でも問題なし。
・フォームコントロール
　 範囲が解除されず、行高調整も正常に行われる。
のですが、そちらの状況とは異なるのでしょうか。
いずれかで満足することはできないですか？
コントロールといったものは、これ以上ユーザーが微調整はできないと思います。

simple　さん　いつもありがとうございます。
ActiveXコントロール でためしていたので、選択が解除されたので、実行されないものとばかり
思い込んで、実行することなく質問をしてしまいました。
 
フォームコントロール　で試してみようとは思いつきませんでした。
これが目的に最適です。ありがとうございました。