Select Case hang up

Little Help?

I'm running a Select Case macro that returns single case results to a different sheet. Is there any way to get it to return multiple results for the same case to a defined range (in the next available cell)? Can I AutoFill or FillDown a defined range for multiple results of Select Case or should I use Select case for singular results and If Then for anything that will produce multiple results EG:


Private Sub CommandButton3_Click()
Dim MemberCell As Range

For Each MemberCell In Range("XTUE")

Select Case MemberCell.Value
Case "500"
Sheets("Daily").Range("B10").Value = MemberCell.Offset(0, -4).Value
Case "501"
Sheets("Daily").Range("B11").Value = MemberCell.Offset(0, -4).Value
Case "TNG"
Sheets("Daily").Range("DETACHED").Value = MemberCell.Offset(0, -4).Value ' would generate multiple results
End Select

Next MemberCell
End Sub

Thanks