組み込みダイアログボックス（条件付書式の設定）

Application.Dialogs(xlDialogConditionalFormatting).Show