鼠标移至这个工作表的标签处,右键,查看代码,将下述代码复制进去我不知你的冒号是全角还是半角,自己在代码中改成一致就行 Sub 清除()
Cells.Replace What:=":", Replacement:=""
Cells.Replace What:="0", Replacement:=""
Cells.Replace What:="1", Replacement:=""
Cells.Replace What:="2", Replacement:=""
Cells.Replace What:="3", Replacement:=""
Cells.Replace What:...
|