请教：如何能把表、查询、报表清单打出来？

yufei6789

站里提供那个《Access结构打印》用不了啊！

hi-wzj

菜单：工具--分析--文档管理器.....

yufei6789

兄台，我是想要名称清单，不是文档管理器这样的内容清单，帮忙啊！

yufei6789

好几百张报表，头都大了

一点通

以下是引用yufei6789在2006-1-18 10:58:00的发言：
好几百张报表，头都大了

你不会为不同标题而内容相同的报表而创建一个报表吧，几百张？应该检讨下了

青青

Sub AllForms()
    Dim obj As AccessObject, dbs As Object
    Set dbs = Application.CurrentProject
    For Each obj In dbs.AllForms
        Debug.Print obj.Name
    Next obj
End Sub

yufei6789

俺就笨到那程度呀？一点通大侠，呵呵

yufei6789

谢谢，青青

yufei6789

可是俺就会使用向导，不会编程啊。青青教的这段写到哪里去啊？俺就这水平编个管理方面的东西也不知道其中有多少垃圾，唉，真羞死人了。请再指点一下好吗？俺纯自学的[em04]

[此贴子已经被作者于2006-1-18 15:45:59编辑过]

yufei6789

如果有沈阳的，俺真盼着登门求教一下呢，有沈阳的大侠吗？