組み込みダイアログボックス（セルの書式設定（表示形式））

Application.Dialogs(xlDialogFormatNumber).Show