Here\'s the code in question:
Dim rr23WS As Worksheet, rrCell As Range Dim rrCheck As Range Dim r As Long Dim rrMatch Dim openWKBK as String openWKBK = "