FOR문 돌릴때 전체 셀을 다돌기에는 시간이 아깝다. 데이터가 많으면 더욱더 컴퓨팅 시간을 줄여야 한다. 그러므로 마지막 셀위치를 알아내서 FOR문에 넣으면 좋겠다는 생각이 든다. 코드는 아래와 같다. Sub 마지막셀찾기() last = Cells(Rows.Count, 1).End(xlUp).Row ': 1열의 값이 들어있는 마지막 셀을 찾는다. MsgBox (last) ':마지막 위치를 확인한다. For d = 1 To last Cells(d, 2).Value = "Copy" ':옆에 행에다가 copy를 기록한다. Next End Sub 코드 테스트를 해보자 테스트에 앞서 마지막셀을 찾기 위해 숫자를 아래와 같이 채운다. 그 다음 위의 코드를 실행한다. 마지막 값이 21임을 확인했다. 확인을 누르..
