|
例えば「新規作成」ダイアログボックスを表示するにはこうなります。
Sub Sample()
Application.Dialogs(xlDialogNew).Show
End Sub
＜新規作成＞ xlDialogNew＜開く＞ xlDialogOpen ＜名前を付けて保存＞ xlDialogSaveAs ＜Web ページとして発行＞ xlDialogPublishAsWebPage ＜作業状態の保存＞ xlDialogSaveWorkspace ＜ページ設定＞ xlDialogPageSetup ＜印刷プレビュー＞ xlDialogPrintPreview ＜印刷＞ xlDialogPrint ＜プリンタの設定＞ xlDialogPrinterSetup ＜印刷タイトルの設定＞ xlDialogSetPrintTitles ＜送信(メールの宛先(添付ファイル))＞ xlDialogSendMail ＜プロパティ＞ xlDialogProperties ＜ファイルの削除＞ xlDialogFileDelete |