|
例えば「図のコピー」ダイアログボックスを表示するにはこうなります。
Sub Sample()
Application.Dialogs(xlDialogCopyPicture).Show
End Sub
＜図のコピー＞ xlDialogCopyPicture＜形式を選択して貼り付け＞ xlDialogPasteSpecial ＜消去＞ xlDialogClear ＜削除＞ xlDialogEditDelete ＜シートの移動＞ xlDialogWorkbookMove ＜シートのコピー＞ xlDialogWorkbookCopy ＜検索＞ xlDialogFormulaFind ＜置換＞ xlDialogFormulaReplace ＜ジャンプ＞ xlDialogFormulaGoto |