Solved: Copy & Paste in same cell

[parttime_guy]

Hi All,

Just need a macro

Sheet 1: has information in Column A (1:100) (different Names)

Sheet 2: has a form

Need to copy information from Sheet1 Cell A1 and paste in Sheet 2 (B2) same cell then print the form and loop till information is over in Column A of sheet 1.

I have the code of the print

Sub printing()
Sheets("Form").PrintOut
End Sub


But... :help I am stuck with the task of copy pasting the information in the same cell and then loop.

Please help.
Thank & Regards

[Bob Phillips]

With Worksheets("Sheet1")

For Each cell in .Range("A1:A100")

cell.Copy Worksheets("Form").Range(cell.Address)
Worksheets("Form").PrintOut
Next cell
End With

[parttime_guy]

Hi XLD,

Thanks - ur code rocks
Works like a charm.
:bow: :friends: :beerchug:
Regards