55.オプション（移行）

Application.Dialogs(xlDialogOptionsTransition).Show