主题：筛选剪贴板内容

请问老师，我在菜单栏做一按钮，点按钮直接在 "制度职责名称"列查找剪贴板上的内容，代码怎么写呢？

Dim s  As  String = ClipBoard.GetText()
' Output.Show(s)

Dim Filter As String
With e.Form.Controls("s")
    If .Value IsNot Nothing Then
        Filter = "制度职责名称 Like  '%" & .Value & "%'"
    End If
End With
If   Filter >   "" Then
     Tables("制度职责").Filter =   Filter
 End If