"Do...While" isn't VBA. Use:

do while str1 = false
str1 = Application.InputBox("Testing", "Blah Blah")
loop


Col


--
colofnature
------------------------------------------------------------------------
colofnature's Profile: http://www.excelforum.com/member.php...o&userid=34356
View this thread: http://www.excelforum.com/showthread...hreadid=560737