vba
2000か2003のどちらかでは動かしたことがある。 責任持たないPublic Sub Hoge()Dim tbl As TableDef Dim fld As Field For Each tbl In CurrentDb.TableDefs If Left(tbl.Name, 4) <> "MSys" _ And Left(tbl.Name, 5) <> "bkup_" Then For Each fld In tbl.F…
2000か2003のどちらかでは動かしたことがある。 責任持たないPublic Sub Hoge()Dim tbl As TableDef Dim fld As Field For Each tbl In CurrentDb.TableDefs If Left(tbl.Name, 4) <> "MSys" _ And Left(tbl.Name, 5) <> "bkup_" Then For Each fld In tbl.F…
