DoCmd.TransferDatabase DatabaseType:="Microsoft Access", DatabaseName:="コピー元ファイルのフルパス", Source:="コピー元テーブル名", Destination:="作成するテーブル名"