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

Application.Dialogs(xlDialogBorder).Show