On Saturday, May 24, 2014 6:44:46 AM UTC-7, Claus Busch wrote:
Hi Howard,



Am Sat, 24 May 2014 15:37:49 +0200 schrieb Claus Busch:



change the following lines:



Info = Application.InputBox("Enter the number of rows," _

& "the source column and the target column comma separated",

"Infos", _

Type:=2)

Info = Application.InputBox("Enter the number of rows," _

& "the source column and the target column comma separated", _

"Infos", Type:=2)



If Info = "" Or Info = "False" Then Exit Sub





Regards

Claus B.

--


A work of art in my eyes!!

Works perfect.

Thanks,
Howard