How to join two different ranges and make it one range of cells

Hello,

I am trying to join two different ranges to make one range of cells. To refer to range ("A4:A90") is pretty straight forward; however i am having a challenge referring to two different range to make one, for example: ("A4:A90, D5:D90").

If CheckBox1.Value = True And CheckBox3.Value = True Then
    For Each cell In ThisWorkbook.Sheets("Sheet3").Range("K5:K2092", "K4181:K6267")
    'If cell.Value Like "?*@?*.?*" Then
    strto = strto & cell.Value & ";"
       
    Next cell
    If Len(strto) > 0 Then strto = Left(strto, Len(strto) - 1)
End If

The code i have above is only dumping ("K5:K2092") into the variable strto. How do i get both ranges ("K5:K2092", "K4181:K6267") to be loaded to the variable strto?