열에서 이름을 선택하는 방법 MS Excel 2007

Question

학생 및 그룹 이름 목록이있는 Excel 문서가 있습니다. 나는 동일한 Excel 문서 내에서 또 다른 한 장을 주석으로 지었다. 이 시트에는 개별 팀 이름 목록이 나열되어 있습니다.

65 명의 학생과 14 개의 정의 된 그룹이 있습니다.

반복하지 않고 14 개의 그룹 이름을 선택하는 방법이 있습니까?

세포 B3-B67에는 학생의 이름이 있습니다. 셀 C3-C67에는 팀 이름이 있습니다. 팀 이름은 각 학생에 대해 입력됩니다.

SQL에서 select distinct (team_name)와 같은 것을 사용할 수 있지만 Excel에서는 어떻게 복제 할 수 있습니까?

건배, Alks.

Answer 1

Excel에서 SQL을 사용할 수 있습니다.

Dim cn As ADODB.Connection 
Dim rs As ADODB.Recordset 

''This is not necessarily the best way to get the workbook name 
''that you need 
strFile = Workbooks(1).FullName 
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strFile _ 
    & ";Extended Properties=""Excel 8.0;HDR=Yes;IMEX=1"";" 

Set cn = CreateObject("ADODB.Connection") 
Set rs = CreateObject("ADODB.Recordset") 

cn.Open strCon 

''Note that HDR=Yes, so we can use Group, otherwise columns (fields) 
''are named F1, F2 etc 
''Pick one: 
strSQL = "SELECT DISTINCT Group FROM DataTable" ''Named range 
strSQL = "SELECT DISTINCT Group FROM [Sheet1$C3:C67]" ''Range 

rs.Open strSQL, cn 

Sheets("Sheet2").Cells(2, 1).CopyFromRecordset rs