In Reply to: うぬぬぬぬ? Posted by Kaz on 2000/06/14 09:32:41
Dim tdf As TableDefDim rpt as ReoprtFor Each tdf In CurrentDB.TableDefsDebug.Print tdf.NameNextFor Each rpt In Application.ReportsDebug.Print rpt.NameNextこんな感じ。(実際に動かしてないんでまちがってるかも(^^;)