동적

Question

나는 엑셀 사용하여 네임 스페이스 "Microsoft.Office.Interop.Excel"

나는 데이터베이스에서 얻고 사용자의 목록을을 만드는 오전 엑셀 열을 만듭니다. 해당 사용자 목록은 자주 변경됩니다.

Dim officers As List(Of String) = List.[Select](Function(p) p.OfficerAssigned).Distinct().ToList() 

각 사용자마다 어떻게 열을 만들 수 있습니까? B 이후, C와 C 이후, D. 어떻게 동적으로 열 알파벳을 늘릴 수 있습니까?

Dim aRange As Range = ws.Range("B2", "B2") 
    aRange.Merge(1) 
    aRange.Value2 = officers(i).ToString() 

Answer 1

내가 gunr2171 @

For I as int32 = 1 to officers.count 
worksheet.cells(1,i) = officers(I-1) 
Next