0

I have a simple input form I'm creating where I would like the information copied 'on button click' (as values, due to some selections being from drop downs) to a table on another sheet, preferably without the need to activate the destination sheet on each copy/paste action within the code, and looking for the first empty row from top down to place the data.

So to use an example, on the form sheet, D8/D10/D15/D18 would need to be copy / pasted to B2/C2/D2/E2 on the report sheet (row 2 being the first empty row here for sake of example).

I've found how I can do the copy/paste of one cell without sheet activation, and without looking for the first empty row as below, but I'm struggling with how to paste this only as values, and how to make it look for the next empty row for placement:

Sheets("Input Form").Range("D8").Copy Destination:=Sheets("Report").Range("B2")

Any help would be much appreciated as this goes beyond my capabilities.

Thank you kindly :)

Danny
  • 1
  • If you're looking for the empty row: `With Sheets("Report")`, `.Cells(.Rows.Count, "B").End(xlUp).Offset(1).Value = Sheets("Input Form").Range("D8").Value`, `End With`. – BigBen Oct 02 '21 at 14:20

0 Answers0