実行中の表示を更新するかしないか (Trueにするのを忘れずに)
Application.ScreenUpdating = False
実行中のアラートを無視するかしないか (Trueにするのを忘れずに)
※無視した場合Yesで処理されるので注意
Application.DisplayAlerts = False
選択しているセルを更新する。表示形式を変更したあとに便利!
Sub reconfirm()
For Each e In Selection
e.Value = e.Value
Next
End Sub