Hallo,

hier eine Codezeile von dir:

If Targets = "Process / sustainability audir" Then

Das heißt aber Target und nicht Targets

Zudem steht da ..... audir du meinst aber wohl ....audit

Teste mal:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Target.Address = "$B$16" Then
    Select Case Target
        Case "Project audit"
            Sheets("Disclaimer Process Audit").Visible = IIf(Target = "Project audit", True, False)
            Sheets("Process Audit").Visible = IIf(Target = "Project audit", True, False)
            Sheets("Findings Process").Visible = IIf(Target = "Project audit", True, False)
            Sheets("GST Comments on Process Audit").Visible = IIf(Target = "Project audit", True, False)
            Sheets("Disclaimer Sustainability Audit").Visible = IIf(Target = "Project audit", True, False)
            Sheets("Sustainability Audit ").Visible = IIf(Target = "Project audit", True, False)
            Sheets("Findings Sustainability").Visible = IIf(Target = "Project audit", True, False)
            Sheets("GST Comments on Sust. Audit").Visible = IIf(Target = "Project audit", True, False)
        Case "Process audit"
            Sheets("Disclaimer Project Audit").Visible = IIf(Target = "Process audit", True, False)
            Sheets("Project Audit").Visible = IIf(Target = "Process audit", True, False)
            Sheets("Findings Project").Visible = IIf(Target = "Process audit", True, False)
            Sheets("GST Comments on Project Audit").Visible = IIf(Target = "Process audit", True, False)
            Sheets("Disclaimer Sustainability Audit").Visible = IIf(Target = "Process audit", True, False)
            Sheets("Sustainability Audit ").Visible = IIf(Target = "Process audit", True, False)
            Sheets("Findings Sustainability").Visible = IIf(Target = "Process audit", True, False)
            Sheets("GST Comments on Sust. Audit").Visible = IIf(Target = "Process audit", True, False)
        Case "Sustainability audit"
            Sheets("Disclaimer Project Audit").Visible = IIf(Target = "Sustainability audit", True, False)
            Sheets("Project Audit").Visible = IIf(Target = "Sustainability audit", True, False)
            Sheets("Findings Project").Visible = IIf(Target = "Sustainability audit", True, False)
            Sheets("GST Comments on Project Audit").Visible = IIf(Target = "Sustainability audit", True, False)
            Sheets("Disclaimer Process Audit").Visible = IIf(Target = "Sustainability audit", True, False)
            Sheets("Process Audit").Visible = IIf(Target = "Sustainability audit", True, False)
            Sheets("Findings Process").Visible = IIf(Target = "Sustainability audit", True, False)
            Sheets("GST Comments on Process Audit").Visible = IIf(Target = "Sustainability audit", True, False)
        Case "Project / process audit"
            Sheets("Disclaimer Sustainability Audit").Visible = IIf(Target = "Project / process audit", True, False)
            Sheets("Sustainability Audit ").Visible = IIf(Target = "Project / process audit", True, False)
            Sheets("Findings Sustainability").Visible = IIf(Target = "Project / process audit", True, False)
            Sheets("GST Comments on Sust. Audit").Visible = IIf(Target = "Project / process audit", True, False)
        Case "Project / sustainability audit"
            Sheets("Disclaimer Process Audit").Visible = IIf(Target = "Project / sustainability audit", True, False)
            Sheets("Process Audit").Visible = IIf(Target = "Project / sustainability audit", True, False)
            Sheets("Findings Process").Visible = IIf(Target = "Project / sustainability audit", True, False)
            Sheets("GST Comments on Process Audit").Visible = IIf(Target = "Project / sustainability audit", True, False)
        Case "Process / sustainability audit"
            Sheets("Disclaimer Project Audit").Visible = IIf(Target = "Process / sustainability audit", True, False)
            Sheets("Project Audit").Visible = IIf(Target = "Process / sustainability audit", True, False)
            Sheets("Findings Project").Visible = IIf(Target = "Process / sustainability audit", True, False)
            Sheets("GST Comments on Project Audit").Visible = IIf(Target = "Process / sustainability audit", True, False)
        Case "Project / process / sustainability audit"
            Sheets("Disclaimer Project Audit").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("Project Audit").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("Findings Project").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("GST Comments on Project Audit").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("Disclaimer Process Audit").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("Process Audit").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("Findings Process").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("GST Comments on Process Audit").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("Disclaimer Sustainability Audit").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("Sustainability Audit ").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("Findings Sustainability").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
            Sheets("GST Comments on Sust. Audit").Visible = IIf(Target = "Project / process / sustainability audit", True, False)
        Case Else
    End Select
End If
End Sub

Gruß Werner