vb Code:
  1. for each w in workbooks
  2.     for each s in w.sheets