엑셀VBA/VBA 기본 (10) 썸네일형 리스트형 엑셀 VBA - Collection 활용한 중복 제거 엑셀 VBA Collection을 활용한 중복 제거 1. Collection 객체 중복 제거를 할 때 가장 유용한 객체는 Collection 입니다. Collection의 경우 각 값에 고유 key 값을 부여 하기 때문에 중복 key 값이 들어 올 경우 자동으로 중복된 내용을 제거해 주는 기능을 하고 있습니다. Sub collection_method() Dim newCol As Collection 'Collction 선언 Set newCol = New Collection '새로운 Collection할당 newCol.Add Item, Key 'add사용 (추가) strCol = newCol.Item(Index) '해당index 값 반환 intCnt = newCol.Count 'collection 갯수 반환.. 엑셀 VBA -폴더 내 파일 열기 VBA 정리 VBA 폴더 내 파일 열기 엑셀 VBA 에서 폴더 내 파일을 여는 방법 중 하나인 FileDialog 를 이용한 방법을 알아보기로 한다 - 폴더 내 파일 선택 후 열기 Sub 폴더내파일열기() Dim i As Integer '순환문 지정 변수 Dim strPath As String '지정위치 With Application.FileDialog(msoFileDialogFilePicker) '폴더선택 창에서 .AllowMultiSelect = True .Show '폴더 선택창 띄우기 If .SelectedItems.Count = 0 Then Exit Sub '취소 선택 시 '매크로 중단 For i = 1 To .SelectedItems.Count '선택한 파일갯수만큼 진행 strPath = .Se.. 이전 1 2 다음
