Dim sFiltro
sFiltro = variabile & "stringa"