what does this code do

[auerdl]

The below code was posted by spideynok. my greatest thanks!!



can someone tell me what this bit of the below code does... I have much to learn

Replace(" OR ([EmployeeName] Like '*%F*')", _
"%F", strFilters(intX))




Private Sub Command25_Click()
Dim strFilter As String, strFilters() As String
Dim intX As Integer

With Me
strFilters = Split(Nz(.Text23, ""), ",")
For intX = 0 To UBound(strFilters)
strFilter = strFilter & _
Replace(" OR ([EmployeeName] Like '*%F*')", _
"%F", strFilters(intX))
Next intX
.Filter = Replace(Mid(strFilter, 5), "'", Chr(34))
.FilterOn = (.Filter > "")
End With
End Sub

[pbaldy]

It replaces "%F" with whatever is contained in the variable.

[Micron]

Should this stray into how to remove any spaces after a character, know that this code is posted in a question thread in this forum and elsewhere by this poster. Poster has already been informed of cross posting etiquette, so no need to repeat that.

[orange]

auerdl,

There is no need to create a new thread regarding the same issue.
Your similar post https://www.accessforums.net/showthread.php?t=60837 was the place to ask this question.

If you are discussing the same topic, please continue in the same thread.
If you don't understand, or have issues with a response(s), then focus on the issue and provide more info.

Also, in your other thread, there is a response specific to cross posting --asking the same/similar question on multiple forums. Please read it.

Good luck with your project.