在Excel中，可以使用VBA编程来实现按目标值筛选电子表格并隐藏没有目标的电子表格。下面是一个示例代码：

Sub FilterAndHideSheets()
    Dim targetValue As String
    Dim ws As Worksheet
    
    ' 设置目标值
    targetValue = "目标值"
    
    ' 遍历所有工作表
    For Each ws In Worksheets
        ' 检查工作表的名称是否包含目标值
        If InStr(1, ws.Name, targetValue, vbTextCompare) = 0 Then
            ' 如果不包含目标值，则隐藏该工作表
            ws.Visible = xlSheetHidden
        Else
            ' 如果包含目标值，则显示该工作表
            ws.Visible = xlSheetVisible
        End If
    Next ws
End Sub

使用此代码，您需要将目标值更改为您要筛选和隐藏电子表格的目标值，并将其粘贴到Excel的VBA编辑器中。然后，运行FilterAndHideSheets宏即可。

请注意，此代码将遍历所有工作表并根据名称隐藏或显示工作表。如果您需要根据其他条件来筛选和隐藏电子表格，您需要根据您的具体需求进行修改代码。