hi,

Try this.

Worksheets("Breads and loafs").Range("h5").Copy _
Worksheets("Basket").Range("C17").End(xlUp)(2)




"Fern" a écrit dans le message de groupe de discussion :
...
I want to copy the information(text) on
Spreadsheet: 'Breads and loafs'
Cell: H5

copy that cell

on to Spreadsheet: 'Basket'
and find the next blank between C6 - C16


Helpppp!!