Compare 2 arrays using Match

this would be better

Dim arr, arrResults, Kindex As Long, Lindex As Long, jindex As Long, arrNot(), XValue
 
    'compare 2 arrays. Values in Arr and NOT in ArrResults need to output
Kindex = 0
arr = Array("2", "4", "5", "6")
arrResults = Array("3", "67", "5", "9")
   ' On Error GoTo Output
    For Lindex = LBound(arr) To UBound(arr)
     For jindex = LBound(arrResults) To UBound(arrResults)
        If arr(jindex) = arrResults(Lindex) Then
         
         ReDim Preserve arrNot(Kindex)
            arrNot(Kindex) = arr(Lindex)
      
      Kindex = Kindex + 1
     End If
   Next jindex
  Next Lindex
   For Each XValue In arrNot
   Range("J1").Value XValue
   Next