[已解决]请教如何把A列中的名单中最后一个顿号删除

jian82372387

请教如何把A列中的名单中最后一个顿号删除放回原处，A列数据里标红的顿号

最佳答案

月排行榜 / 总排行榜

cutecpu

2023-2-25 13:08

sub demo()
a=[a1].Currentregion
for i=1 to ubound(a)
  If right(a(i,1),1)="、" then
    a(i,1)=left(a(i,1),len(a(i,1))-1)
  End if
next
  [a1].resize(i-1)=a
End sub

跳转到最佳答案楼层

cutecpu

sub demo()
a=[a1].Currentregion
for i=1 to ubound(a)
  If right(a(i,1),1)="、" then
    a(i,1)=left(a(i,1),len(a(i,1))-1)
  End if
next
  [a1].resize(i-1)=a
End sub