软体:excel 版本:任何版本 我有请同仁做汇整 但是来的储存格 尾端都一定要有句号 我写vba去加入 == i = Range("A4").End(xlDown).Row For X = 5 To i If Right(Trim(Range("K" & X)), 1) <> "。" Then Range("K" & X) = Trim(Range("K" & X)) & "。" End If Next X === 不过遇到下面状况会不行 1. 昨天天气很糟。 今天天气很好。 <=== 若是句号後面有空格 就会变成 昨天天气很糟。 今天天气很好。 。 2. 昨天天气很糟。 今天天气很好。 <===若是後面有换行符号 会变成 昨天天气很糟。 今天天气很好。 。 有些人输入不知道怎麽搞的都会在尾巴出现空格或者换行符号 这时候程式不知道要怎麽改? --

※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 60.250.67.77 ※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Office/M.1490943027.A.D46.html 档案如下 https://drive.google.com/open?id=0BwCgrQhGgaw7WHk3Y3VKc2RsVHM 空格的会正确 发现是同仁本来就打了两个句号 害我误会XD 不过现在是尾端有char(10)的问题 ※ 编辑: ljuber (60.250.67.77), 03/31/2017 15:23:10