Thank you both! I could not have figured this out.

I had to make two subtitutions...iLeft instead of .left and iRowIndex
for .RowIndex when checking to see if the Drawing toolbar is visible.

This works great! Thank you again.

Craigm

iLeft = CommandBars("Drawing").Left + CommandBars("Drawing").Width + 1
iRowIndex = CommandBars("Drawing").RowIndex


--
Craigm
------------------------------------------------------------------------
Craigm's Profile: http://www.excelforum.com/member.php...o&userid=24381
View this thread: http://www.excelforum.com/showthread...hreadid=499513