
Getting a List of tables using VBA??
Set the record-source of list/combo-box to:
Select Name From MSysObjects where ((Type=1 or Type=6) and Left$(Name,
1) <> "~") Order by Name;
Type = 1 is a table
Type = 6 is a linked table
HTH
LMH rogue(at)channel1 dot com |or| draupner (at) theglobe dot com
WWW http://www.channel1.com/users/rogue
FAQ: http://members.forfree.at/~larsm
http://home.att.net/~dashish
http://www.hammerdata.com/Newsgrp
http://www.channel1.com/users/rogue/Access/FAQ
http://members.xoom.com/dashish
ICQ 10300112
Please limit questions/replies to news-group(s)...
Reply address may be foiled to fool spam-bots. Remove the obvious.
"Do it once, do it right. Cremate Kenny!"