With Excel 365: Sub uniq() With Application.WorksheetFunction divisionNames = .Unique(Range("C3:C30")) End With End Sub. EDIT#1:.
確定! 回上一頁