PDA

View Full Version : Creating a macro for next empty row



tommyl18
02-12-2014, 03:07 PM
Hi would you please be as kind as to help me create a macro on my attached workbook to find the next empty row in the table for data input

tommyl18
02-13-2014, 02:12 AM
Is it better to use a macro to insert a new row rather than find the next empty row in a table?

mdmackillop
02-19-2014, 01:37 PM
Sub TransferData()


Dim Source As Range, Target As Range


Set Source = Range("H1").End(xlDown).CurrentRegion
Set Target = Cells.Find("Total Expenses").End(xlUp)(2)
Source.Copy
Target.PasteSpecial Paste:=xlPasteValues
Source.ClearContents
Application.CutCopyMode = False


End Sub