Thanks alot sir,

its working very nicely ur correct instead of mention cells(mrow,5).select and i used ur code cells(mrow,5).value = fdr.

Once again thanks & today i learn new thing here.

one more thing sir how to make this thread got solved.

Thanks,
Naveed.