wow!! it works man!! thanks a ton!! I am very new to VBA and not really sure how this works. Would appreciate it if you could explain it a bit. I did make one modification to your code.. I added the below to center the cell.
rd.Offset(i, 0).HorizontalAlignment = xlCenter
need to understand...
I want to copy the contents of the cell A10 into c44:f44( and merge the cells c44:f44). this needs to be repeated. i.e. A11 would need to be copied to c45:f45(merged), A12 would be copied to c46:f46 and so on. I do not want to copy the whole column of A:A. I only want a range i.e. A10- empty cell.