how to use for each loop in Excel VBA?

Published --