I need to change the locations to left and right how would I incorporate that into the code especially this line "Set c = .Find("Location " & i, , xlValues, xlWhole)"