发布网友 发布时间:2022-04-25 22:58
共2个回答
热心网友 时间:2023-10-16 13:24
如果少,用一楼的方法。
如果多
使用宏
选中要改的那些单元格,然后执行宏
Sub Altdel()
Dim Myr As Range
For Each Myr In Selection
aa = Myr.Value
For I = Len(aa) To 1 Step -1
If Asc(Mid(aa, I, 1)) = 10 Then
aa = Left(aa, I - 1) & Right(aa, Len(aa) - I)
Exit For
End If
Next I
Myr.Value = aa
Next
End Sub
热心网友 时间:2023-10-16 13:25
双击进入单元格,按退格键除掉最后一行呀,你说的是这个意思吗?