Solved

Append Multiple Tables with varying names into one

Posted on 2009-06-30
24
390 Views
Last Modified: 2012-05-07
i have many tables that i've imported from an excel sheet wih tabs. I already did the code so that each tab has its own table name. i want to be able to consolidate all those tables into one.

i have auto named the tables BC1, BC2, BC3, etc. There can be 2 tables or there can be 20 tables imported.

question is how can i append all those tabels into one master? Each table does have column headings but one of them might contain an extra column.

Please let me know if you need more information.
0
Comment
Question by:repco
  • 13
  • 8
  • 3
24 Comments
 
LVL 2

Expert Comment

by:Jambyte
Comment Utility
INSERT INTO Table3
SELECT Field1, Field2 from Table1
UNION ALL
SELECT Field1, Field2 from Table2
UNION ALL
Select Field1, '' as Field2 from Table3


the last select doesn't have a second column but needs a blank one for the union to work... hope that makes sense.
0
 
LVL 2

Expert Comment

by:Jambyte
Comment Utility
err the last select should be from table4
0
 

Author Comment

by:repco
Comment Utility
there can be 2 - 30 tables out there.
0
 
LVL 2

Expert Comment

by:Jambyte
Comment Utility
the number of tables changes?
0
 

Author Comment

by:repco
Comment Utility
yes, plus the code you gave me does not work anyway.
there can be 2 to 30 tables. BC1, BC2, BC3, BC4, etc. i want those consolidated into the IMPORT_MASTER table.

Table BC2, might have an extra column than the BC1, or BC3 table.
0
 
LVL 119

Expert Comment

by:Rey Obrero
Comment Utility
* number of table changes
* Number of column is not constant

Are the names of columns always the same (except for the Extra columns)?
Are the names of Extra columns consistent? does not change?

what is the structure of the IMPORT_MASTER table? post the name of fields and Data type of each field.
0
 

Author Comment

by:repco
Comment Utility
thank you for your response Capricorn1.

1. The names of the columns are all the same on all BC1, BC2 tables. one of the tables just contains one extra column. I have created a "IMPORT_Master" table which has all columns, including the extra.
2. The names of the extra column is always the same.

i.e.
Table BC1
Part | Date | Code | Comment

Table BC2
Part | Date | Comment

Table IMPORT_Master
Part | Date | Code | Comment

i want to be able to append tables BC1 > BC(number of tables existing under "BC) it can be 3 to 20 tables. BC1, BC2...BC20. into the IMPORT_Master table.

thanks so much!!
0
 
LVL 119

Expert Comment

by:Rey Obrero
Comment Utility
you can do this using VBA codes. Is this an option?
0
 

Author Comment

by:repco
Comment Utility
sure i know vba
0
 
LVL 119

Accepted Solution

by:
Rey Obrero earned 500 total points
Comment Utility
place this codes in a module.


sub mergeTables()
dim td as Dao.tabledef, db as dao.database
dim tableName as string, sql as string
set db=currentdb()
'to clear the IMPORT_Master table before importing new records

db.execute "delete * from IMPORT_Master"

for each td in db.Tabledefs
    if left(td.name,2)="BC" then
    tableName=td.name
    sql="Insert into [IMPORT_Master]"
    sql=sql & " select * from ["& tablename &"]"
    db.execute sql
    end if
next

db.close
end sub
0
 

Author Comment

by:repco
Comment Utility
im gettin error message
THE INSERT INTO statement contains the following uknown field anme 'Qty On Hand '. Make sure you typed the name correctly and try the operation again.

Sorry i should of also included that as one of the fileld names above.
i do have Qty on Hand field on the IMPORT_Master table set.
0
 

Author Comment

by:repco
Comment Utility
ah wait n/m the qty on hand had an extra space on the import tables.
0
Complete VMware vSphere® ESX(i) & Hyper-V Backup

Capture your entire system, including the host, with patented disk imaging integrated with VMware VADP / Microsoft VSS and RCT. RTOs is as low as 15 seconds with Acronis Active Restore™. You can enjoy unlimited P2V/V2V migrations from any source (even from a different hypervisor)

 

Author Closing Comment

by:repco
Comment Utility
Thank you!!
0
 

Author Comment

by:repco
Comment Utility
capricorn1 if i didn't want to use SELECT * but instead each filed name how would that work?  i have

"INSERT INTO IMPORT_Master ( [date], [part number], [Pallet)"
SELECT [" & tablename & "].date,  [" & tablename & "].[Part Number], ["& tablename & "]"
FROM [" & tablename & "]"

reason why is because i need to add in the tablename to the "Pallet Field"
i keep getting Too few parameters
0
 
LVL 119

Expert Comment

by:Rey Obrero
Comment Utility


sql="INSERT INTO IMPORT_Master ( [date], [part number], [Pallet])"
sql=sql &" SELECT [" & tablename & "].[date],  [" & tablename & "].[Part Number], ["& tablename & "] as Pallet FROM [" & tablename & "]"
0
 

Author Comment

by:repco
Comment Utility
i copied and pasted your formula but i still keep getting too few parameters. Expected 1. and it highlights db.execute sql on the debugger
0
 
LVL 119

Expert Comment

by:Rey Obrero
Comment Utility
upload a copy of your db with the tables
0
 
LVL 119

Expert Comment

by:Rey Obrero
Comment Utility
use this


sub mergeTables()
dim td as Dao.tabledef, db as dao.database
dim tableName as string, sql as string
set db=currentdb()
'to clear the IMPORT_Master table before importing new records

db.execute "delete * from IMPORT_Master"

for each td in db.Tabledefs
    if left(td.name,2)="BC" then
    tableName=td.name
    sql="Insert into [IMPORT_Master]"
    sql=sql & " select * from ["& tablename &"]"
    db.execute sql

     db.execute "update [IMPORT_Master] set [pallet]='"& tablename &"' where pallet is null"

    end if
next

db.close
end sub
0
 

Author Comment

by:repco
Comment Utility
Form1 is where the code is.
Program.mdb
0
 
LVL 119

Expert Comment

by:Rey Obrero
Comment Utility
where is the IMPORT_Master table?
0
 

Author Comment

by:repco
Comment Utility
my apologies.
Program.mdb
0
 

Author Comment

by:repco
Comment Utility
im basically trying to import everything from the S PA tables into the IMPORT_Master. i know above we used only a few fields but that was for testing. i could of screwed up there. sorry if i did
0
 
LVL 119

Expert Comment

by:Rey Obrero
Comment Utility
some data from the one of the tables is not of the same data type..

you will see it from the message box when the error is generated during the import.
ProgramRev.mdb
0
 

Author Comment

by:repco
Comment Utility
thank you again!
0

Featured Post

Highfive + Dolby Voice = No More Audio Complaints!

Poor audio quality is one of the top reasons people don’t use video conferencing. Get the crispest, clearest audio powered by Dolby Voice in every meeting. Highfive and Dolby Voice deliver the best video conferencing and audio experience for every meeting and every room.

Join & Write a Comment

Regardless of which version on MS Access you are using, one of the harder data-entry forms to create is one where most data from previous entries needs to be appended to new records, especially when there are numerous fields and records involved.  W…
Describes a method of obtaining an object variable to an already running instance of Microsoft Access so that it can be controlled via automation.
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
With Microsoft Access, learn how to specify relationships between tables and set various options on the relationship. Add the tables: Create the relationship: Decide if you’re going to set referential integrity: Decide if you want cascade upda…

743 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

15 Experts available now in Live!

Get 1:1 Help Now