Dear Lewis,

I received error "run-time error 9 ; subscript out of range"
& yellow mark at script line :

Set inputWks = Worksheets("source")

Note : The database file opened but no input ...

Thank you again