'자동으로 순번 메기는 방법 Dim i As Long Dim c As Range, 일련번호시트 As Range Application.ScreenUpdating = 0 Set 일련번호시트 = Sheet1.Range("b2:b" & Sheet1.Range("c" & Rows.Count).End(xlUp).Row) ' '"b2:b"=일련번호 넣는 셀 ' "c" 카운터 할 셀 For Each c In 일련번호시트 i = i + 1 c.Value = i Next c
'자동으로 순번 메기는 방법
Dim i As Long
Dim c As Range, 일련번호시트 As Range
Application.ScreenUpdating = 0
Set 일련번호시트 = Sheet1.Range("b2:b" & Sheet1.Range("c" & Rows.Count).End(xlUp).Row) ' '"b2:b"=일련번호 넣는 셀 ' "c" 카운터 할 셀
For Each c In 일련번호시트
i = i + 1
c.Value = i
Next c