Здравствуйте, Аноним, Вы писали:
А>Что-то мне подсказывает, что Common Print диалог и стандартный оффисный диалог печати — не одно и то же. Или я не прав? Не хотелось бы шокировать пользователя 
Ну тогда так:
Dim E As Excel.Application
Set E = New Application
E.Workbooks.Add
E.Dialogs(xlDialogPrint).Show
