정렬 썸네일형 리스트형 VBA 4가지 조건에 따라 정렬하기 프로그램 설명 '짧은 케이블 정렬하기 (케이블 길이에 따라 오름차순으로 정렬하기) Sub Shortsorting() ' 매크로로 이용해서 코드 작성 For i = 2 To (Worksheets.Count) Worksheets(i).Activate Range("B3").Select 'activecell 정렬할 때 커서를 데이터 위치에 이동 ActiveCell.Sort Key1:=Range("C4"), order1:=xlAscending, Header:=xlYes 'activeCell대신 range("B3")를 넣어도 되지 않을까? Next i Worksheets(1).Activate End Sub 'C location cable 위로 정렬하기 Sub C_locationsorting() For i = 2 T.. 더보기 이전 1 다음