Copy a row record to a sheet based on the date entered in to a cell

Hello, sorry this reply took so long... i'm still learning about excel code myself so it took me a while to work out all the bugs.

I believe this will work for you but i stress that you really should save and backup your work, and use a test sheet beforehand because you may ned to alter the code slightly!

you should paste this into the "microsoft excel objects" area for the main sheet:

Private Sub Worksheet_Change(ByVal Target As Range)

    Dim strMonth As String
    Dim rngToCopy As Range
    Dim rngToPaste As Range
    
    'this IF will activate only cells in Column C,D, or E when the cell value changes and enter is pressed
    If Target.Address = Range("C" & Target.Row).Address Or Target.Address = Range("D" & Target.Row).Address Or Target.Address = Range("E" & Target.Row).Address Then
    
    'this strMonth turns the value entered into a Month name eg "January"
     strMonth = Format(Target, "mmmm")
    
    
    'define the Rows of information to copy and paste
    Set rngToCopy = Sheets(1).Range(Rows(Target.Row).Address)
    Set rngToPaste = Sheets(strMonth).Range(Rows(Sheets(strMonth).Cells(23000, 1).End(xlUp).Row).Address)

        'use the Month name to determine the worksheet to use
        
            rngToCopy.EntireRow.Copy Destination:=rngToPaste.Offset(1)

    Else: Exit Sub
    
    End If

End Sub