If e.Col.Name = "分组" Then Dim s As String For Each us As UserInfo In Users s = s & "|" & us.Group Next e.Col.Combolist = sEnd If
项目内,已经定义了三个分组.分别是:销售部,采购部,生产部.
同时也定义了4个用户名,分别是 A,B,C,D 4个用户.
销售部:A,B
采购部:C
生产部:D
此时,在下拉列显示的是:二个销售部,一个采购部,一个生产部.
而不是获取不重复的分组名称