- 博客(3)
- 收藏
- 关注
RSS订阅
1转载 Excel下拉列表设置多选VBA
Option ExplicitSub Worksheet_Change(ByVal Target As Range)Dim rngDV As RangeDim oldVal As StringDim newVal As StringIf Target.Count > 1 Then GoTo exitHandlerOn Error Resume NextSet rngDV = Cells.SpecialCells(xlCellTypeAllValidation)On Error ..
2022-03-01 09:05:53
1286
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人