Hi welshgirl
luck it a wet long weekend
here is an idea i borrowed from Romperstomper
Place this code in the "Project A" sheet module
every time you leave the sheet it will update the "Master Budget" sheet if there have been new rows added
Option Explicit
Private m_StartRecordCount As Long
Public Property Get StartRecordCount() As Long
StartRecordCount = m_StartRecordCount
End Property
Private Sub Worksheet_Activate()
m_StartRecordCount = Sheets("Project A").Cells(Rows.Count, 1).End(xlUp).Row
End Sub
Private Sub Worksheet_Deactivate()
Dim ExitRecordCount As Long
Dim MasterListRow
ExitRecordCount = Sheets("Project A").Cells(Rows.Count, 1).End(xlUp).Row
With Sheets("Master Budget")
MasterListRow = "A" & .Cells(Rows.Count, 1).End(xlUp).Row + 1
End With
If ExitRecordCount > StartRecordCount Then
Range("A" & StartRecordCount + 1 & ":H" & ExitRecordCount).Copy Sheets("Master Budget").Range(MasterListRow)
End If
End Sub
you can change and use it in sheets Project B and C ect....
Bookmarks