显示当前第一份演示文档的名称。

MsgBox Application.Presentations(1).Name