Sir,
What is wrong in the following code:
Dim ColN as Integer
colN = ActiveSheet.Cells.Find(What:="Yes1").Column ' This one give the column Number where the "Yes1" is written
Sheet1.Range("F3")=Sheet3.Range(Cells(1,ColN)) 'Here I am getting the error
The above codes are giving run time error.
I don't know why I am getting this error.

Regards
Vivekchha