VBA课程记录6
2017年10月3日 - 网易
MsgBoxApplication.Sum(Selection.SpecialCells(-4144))EndSubSub删除空行()OnErrorGoTo100Selection.SpecialCells(xlCellTypeBlanks).SelectSelection.EntireRow.DeleteExitSub100:MsgBox"没有空行"EndSub'Range.Find方法'在区域中查找特定信息'语法'表达式.Find(What,After,LookIn,Look...
详情