I have no idea what ListType was, so I declared it as long (an integer).

Since I didn't know what it was, I just took the value from that cell and tried
to make sure it was a nice number.

You never shared what ListType was and how it was derived--so I just guessed.

bach wrote:
>
> Dave,
>
> Thanks for your reply, I have used the code and i get a type
> mismatch.
>
> 'pick it up from the list worksheet
> ListType = CLng(mySelectedCell.Offset(0, 8).Value)
>
> --
> bach
> ------------------------------------------------------------------------
> bach's Profile: http://www.excelforum.com/member.php...o&userid=26134
> View this thread: http://www.excelforum.com/showthread...hreadid=468634

--

Dave Peterson