Showing entries in separate sheets according to column criteria

We can help you out. Why dont you attach a sample file and explain with the help of it?

To Attach a File:

1. Click on Go Advanced
2. In the frame Attach Files you will see the button Manage Attachments
3. Click the button.
4. A new window will open titled Manage Attachments - Excel Forum.
5. Click the Browse... button to locate your file for uploading.
6. This will open a new window File Upload.
7. Once you have located the file to upload click the Open button. This window will close.
8. You are now back in the Manage Attachments - Excel Forum window.
9. Click the Upload button and wait until the file has uploaded.
10. Close the window and then click Submit.

What if there is already data existing in X, Y, Z and Relevant? Should that be cleared or should this data be copied to the next available row in each of these sheets?

Try this code

Option Explicit

Sub update_sheets()
Dim MySheet As Variant
Dim i As Long, lrow As Long, j As Long
Dim sname As String

Application.ScreenUpdating = False

For Each MySheet In Array("Relevant", "X", "Y", "Z")
    With Worksheets(MySheet)
        lrow = .Range("A" & .Rows.Count).End(xlUp).Row
        If lrow > 1 Then
            .Range("A2:O" & lrow).ClearContents
        ElseIf lrow = 1 Then
            Worksheets("Gross list").Range("A1:O1").Copy .Range("A1")
        End If
    End With
Next MySheet

With Worksheets("Gross list")
    lrow = .Range("A" & .Rows.Count).End(xlUp).Row
    For i = 2 To lrow
        For j = 16 To 19
            If .Cells(i, j).Value = "Ja" Then
                sname = .Cells(1, j).Value
                If j = 16 Then sname = Left(.Cells(1, 16).Value, Len(.Cells(1, 16).Value) - 1)
                .Range("A" & i & ":O" & i).Copy Worksheets(sname).Range("A" & Rows.Count).End(xlUp).Offset(1, 0)
            End If
        Next j
    Next i
End With

MsgBox "Transfer complete"

Application.ScreenUpdating = True

End Sub

Copy the Excel VBA code
Select the workbook in which you want to store the Excel VBA code
Hold the Alt key, and press the F11 key, to open the Visual Basic Editor
Choose Insert | Module
Where the cursor is flashing, choose Edit | Paste

To run the Excel VBA code:
Choose View | Macros
Select a macro in the list, and click the Run button

If you are going to password protect them, then the code will have to unprotect them, add the data and protect them again.