vba 코드 문의 드립니다.

@더운물 님 매크로 - 편집 들어가셔서 이 부분 넣어주세요.

"P열 aa,bb만 남기고 삭제" 에 해당하는 내용입니다.

Dim numRows As Integer, i As Integer
numRows = Range("A1").CurrentRegion.Rows.Count - 1
Cells(2, "P").Select
For i = 0 To numRows
If Selection <> "aa" And Selection <> "bb" Then
Selection.EntireRow.Delete
numRows = numRows - 1
Else
Selection.Offset(1, 0).Select
End If
Next

@개구리뒷다리 님 현재 파일에서는 문제가 없지만,  코딩하는 습관 때문에 문제될 부분이 있어 사족을 답니다.

For,,,Next 문에서 변수를 사용할 경우 아래 문장은 의미가 없습니다.
numRows = numRows - 1

For i = 0 To numRows 이 문장이 시작되면
numRows가 바뀌어도 i는 처음 For문이 시작될 때의 numRow까지 계속 진행을 합니다.
다행히 아래쪽으로 다른 자료가 없으면 문제가 없지만,
만약 numRows아래쪽으로 다른 자료가 있었다면 삭제될 수도 있습니다.

For...Next 문으로 행을 삭제할 때는 가급적 아래쪽에서 위로 가면서 작업하시는 것이 좋습니다.
For i = numRows to 1 Step -1

@원조백수 님 네 감사합니다 명심하도록 하겠습니다!