組み込みダイアログボックス（ユーザー設定リスト）

Application.Dialogs(xlDialogOptionsListsAdd).Show