stLinkCriteria with multiple criteria and NULL scenario

[sbar1]

I am currently using the code below, but want to modify it so if one of the three fields below is NULL that it will pull records matching the other two. Any help would be appreciated, I could not figure it out playing around with anything I found online.

stLinkCriteria = "([BU]='" & Me![buselect] & _
"') And ([Quarter]='" & Me![quarterselect] & _
"') And ([Yr]='" & Me![yrselect] & "')"


DoCmd.OpenForm stDocName, , , stLinkCriteria

[ssanfu]

I am currently using the code below, but want to modify it so if one of the three fields below is NULL that it will pull records matching the other two. Any help would be appreciated, I could not figure it out playing around with anything I found online.

stLinkCriteria = "([BU]= '" & Me![buselect] & _
"') And ([Quarter]='" & Me![quarterselect] & _
"') And ([Yr]='" & Me![yrselect] & "')"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Build the WHERE clause on-the-fly(something like this):

  Dim stLinkCriteria As String
  
  stLinkCriteria = ""
  
  If Not IsNull(Me.buselect) Then
    stLinkCriteria = "[BU]= '" & Me.buselect & "' AND "
  End If

  If Not IsNull(Me.quarterselect) Then
    stLinkCriteria = stLinkCriteria & "[Quarter]='" & Me.quarterselect & "' AND "
  End If

  If Not IsNull(Me.yrselect) Then
    stLinkCriteria = stLinkCriteria & "[Yr]= '" & Me.yrselect & "' AND "
  End If

  If Len(Trim(stLinkCriteria)) > 5 Then
  'remove the last 5 chars
    stLinkCriteria = Left(stLinkCriteria, Len(stLinkCriteria) - 5)
  Else
    'select all records
    stLinkCriteria = Empty
  End If

  DoCmd.OpenForm stDocName, , , stLinkCriteria

[sbar1]

Thank you so much! I had been trying for hours sadly, and the closest I got would have worked if I didn't leave out the "End if" code I think.

[ssanfu]

Thank you so much! I had been trying for hours sadly, and the closest I got would have worked if I didn't leave out the "End if" code I think.

You're welcome