Excel VBA中比较长字符串与不一致

Question

我有有三个Excel列：“描述”和“使用”是在片材1，在片材“descr和用法” 2.

描述和使用被组合成一个片它与标题（“说明：”和“用法”）或与Entertab分离。

描述始终以小写字母开头（Excel以名称开头），描述始终以大写字母开头。

有时，描述以句点结束，有时不结束。

这些列是一个非常大的老文件的一部分。有些数据在IT系统首次实施时已经手动插入，这就是为什么有这么多不一致的原因。

现在我想做一个自动比较，但我不知道如何处理所有的不一致，我该怎么办？

Answer 1

部分代码：

s$= cells.value 
while right(s,1)=" " 
s=left(s,len(s)-1) 
wend 
s = ucase( left(s,1)) & right(s,len(s)-1) 
cells.value = s