홈>
좋아요. 그래서 참조 테이블을 통해 분류 된 테이블에서 사용자 정의 정렬을 시도하고 있습니다. 여기에는 참조 테이블의 작은 부분이 있습니다.
이제 분류 표를 정렬 할 때마다 이것이됩니다
보시다시피, 그것은 특정 수의 행까지만 정렬하고 (C&J Global Enterprises) 나머지는 알파벳순으로 정렬됩니다 (내가 원하는 것은 아닙니다)
여기 내 VBA 코드가 있습니다
Private Sub WorkSheet_Activate()
Dim MainSheet As Worksheet, RefSheet As Worksheet
Set MainSheet = Worksheets("Classifieds Client Table")
Set RefSheet = Worksheets("RefTable")
Dim RangeOne As Range, RangeTwo As Range
Set RangeOne = MainSheet.Range("A2:A150")
Set RangeTwo = RefSheet.Range("A1:A137")
Dim MainRange As Range
Set MainRange = MainSheet.Range("A2:H150")
Application.AddCustomList ListArray:=RangeTwo
MainSheet.Sort.SortFields.Clear
MainRange.Sort Key1:=MainRange, Header:=xlNo, _
OrderCustom:=Application.CustomListCount + 1, MatchCase:=False, _
Orientation:=xlTopToBottom, DataOption1:=xlSortNormal
Application.DeleteCustomList Application.CustomListCount
미리 감사합니다!
- 답변 # 1
관련 자료
- if 문이 문자열 데이터에서 제대로 작동하지 않음 - excel
- worksheet function - Microsoft Excel 수식이 제대로 작동하지 않음
- sapui5 - 사용자 지정 파일 이름을 사용하여 UI5에서 Excel로 데이터를 내보내는 방법
- javascript - 개체에서 속성을 선택하는 사용자 지정 선택기 함수를 올바르게 입력하는 방법
- xml - Android에서 작동하지 않는 사용자 정의 백그라운드 리소스
- c++ - 내 프로그램이 제대로 작동하지만 마지막에 분할 오류가 표시됨
- Toggling not working properly - 제대로 작동하지 않는 토글 - 자바 스크립트
- subtraction - Paperjs가 제대로 작동하지 않는 모양에 대한 경로 빼기
- 제대로 작동하려면 Excel vba를 사용하여 curl API 요청 코드를 얻는 데 도움이 필요합니다
- c++ - 이 배열을 반복 할 때 코드가 제대로 작동하지 않는 이유
- reactjs - 재귀가 제대로 작동하지 않음 (React에서)
- python - 키 움직임이 제대로 작동하지 않는 이유는 무엇입니까?
- python - 파일 작업 중 오류를 올바르게 처리하는 방법은 무엇입니까?
- drupal - 일부 #states는 사용자 정의 필드에서 작동하지 않지만 동일한 웹 양식 필드에서 작동합니다
- sql - Postgresql에서 작동하지 않는 현재 날짜 및 사용자 지정 시간으로 쿼리 업데이트
- drupal - managed_file 사용자 정의 양식 필드의 #ajax가 작동하지 않습니다
- verilog - $display가 testbench에서 제대로 작동하지 않습니다
- knockout.js - jquery 버전을 21에서 3으로 업그레이드 한 후 녹아웃 유효성 검사 사용자 지정 규칙이 작동하지 않습니다
- reactjs - React Native asyncStorage가 제대로 작동하지 않습니다
- ruby - rails의 사용자 지정 도메인이 apptestcom - 3000에서 작동하지 않습니다
관련 질문
- excel : VBA가 시트 활성화를 인식하지 못함
- excel : VBA 연결 삭제, "일정하지 않음에 대한 할당"오류
- excel : Y-Labels가있는 차트의 마지막 페이지 인쇄
- VBA가 실행되는 동안 차트를 업데이트합니다
- Excel VBA, 시트 간의 열에서 값을 확인하고 중복 삭제
- Excel에서 XLWings AddIn을 완전히 제거 할 수 없습니다
- excel : 정확한 위치에서 셀 내용을 읽고 기존 매크로의 정보를 찾아야합니다.
- Windows Scheduler로 자동 업데이트 Excel Closed 워크 북
- excel : 루프의 VBA 풀 탭 이름
- excel : 래핑 된 셀에서 VBA를 통한 행 수
SortOn
Range.Sort
에 유효한 매개 변수가 아닙니다. .SortMethod
.그것을 수정하십시오 (또한 답변과 관련이없는 외부 코드를 제거하십시오). 맞춤 목록으로 정렬되지 않으면 답변을 편집하고 알아 내려고 시도합니다.
추가 정보 :MSDN :
Range.Sort
방법