Hi

I would like to adress all controlelements in my worksheet one by one using
the "For Each"- statement, but i can't get it working.

Dim i As Controls
For Each i In Worksheets("Sheet1")
MsgBox i.Name
Next

Hoping for help

Claus