質問: 0 End Select End Sub ### 試したこと ここに問題に対して試したことを記載してください。 ### 補足情報(FW/ツールのバージョンなど) ここにより詳細な情報を記載してください。
回答: 画面更新をEnd Selectの後に追加で一応更新されるみたいです。 ``` Application.ScreenUpdating = True ```