Hi Steve
thank you for caring for my problem.
below you can find the macro and it's content.
i hope it helps you the way i have written it.
Regards
Reiner
Action Parameter Content Comment
SetWarnings no messages
Warnings on No
DeleteObject delete pre table
Object type Table
Object name Pre_Table
OpenQuery delete Rows in table "Offene PO"
Query Name Delete Rows in Table Offene PO
View Datasheet
Data mode Edit
TransferSpreadsheet Get new table
Transfer type Import
Spreadsheet type Microsoft Excel 3
Table name Pre_Table
File Name P

pen_20040901.xls
Has Field Names No
Range
OpenQuery Append info to "Open PO" Table
Query Name Append Table Open PO
View Datasheet
Data mode Edit
OpenQuery Add "Null"to Blank in Material field
Query Name Add "Null"to Blank in Material field
View Datasheet
Data mode Edit
OpenQuery create table with material classification
Query Name Create Table with Material Classification
View Datasheet
Data mode Edit
OpenQuery create table open noble parts orders
Query Name Open Noble Part orders
View Datasheet
Data mode Edit
OpenReport bligerig
Reportname Delinquent PO LI-Bilgerig
View Print
Filtername
Where Condition
PrintOut
Print Range Selection
Page from
Page to
Print quality high
Collate copies yes
Close Close Bilgerig
Object type Report
Object name Delinquent PO LI-Bilgerig
Save no