Excel vba如何实现多重不重复组合
2个回答
展开全部
Sub test()
‘以卖拍下是以Sheet3.Rows("1:10")为例来做的
If Sheet3.Rows("1:10").OutlineLevel > 2 Then ’判断是不是多重组合,1为无组合，
Sheet3.Rows("1:10").ClearOutline ‘中激羡铅稿一次清除所有组合
End If
End Sub
通过验证了，可以实现
估计你是不清楚OutlineLevel和ClearOutline这两个用法吧，
祝你成功！
‘以卖拍下是以Sheet3.Rows("1:10")为例来做的
If Sheet3.Rows("1:10").OutlineLevel > 2 Then ’判断是不是多重组合,1为无组合，
Sheet3.Rows("1:10").ClearOutline ‘中激羡铅稿一次清除所有组合
End If
End Sub
通过验证了，可以实现
估计你是不清楚OutlineLevel和ClearOutline这两个用法吧，
祝你成功！
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
