- 博客(2)
- 资源 (3)
- 收藏
- 关注
原创 excel 同一工作表中非连续区域中筛选唯一值 (VBA代码) 二
Sub 取不重复值() Dim Cel As RangeDim itm As Variant, i As VariantDim MyList As New CollectionDim SelectArea As Range 'Application.ScreenUpdating = False On Error Resume NextFor Each Cel In Selection If Cel "" Then MyList.Add Cel.Value, CSt
2010-06-19 16:34:00 2256
原创 excel 同一工作表中非连续区域中筛选唯一值 (VBA代码)
<br />Sub 筛选唯一值() '筛选唯一值 Dim Des As New Collection Dim Newsheet As Worksheet Dim Oldsheet As Worksheet Dim ItemX As Variant Dim Rg As Range Dim i As Integer Application.ScreenUpdating = False Appl
2010-06-12 16:20:00 2986 1
超酷VBA工程加锁解锁器 By ldhyob
2011-03-15
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人