《VBA经典应用69例》（版权10178981），是我推出的第九套教程，教程是专门针对初级、中级学员在学习VBA过程中可能遇到的案例展开，这套教程案例众多，紧贴“实战”，并做“战术总结”，以便大家能很好的应用。教程的目的是要求大家在实际工作中要利用好VBA。本套教程共三册六十九个专题，今日内容：VBA经典应用69例应用7：从给定的字符串中删除指定个数的字符

【分享成果，随喜正能量】愿意吃亏的人，终究吃不了亏。吃亏多了，总有厚报。爱占便宜的人，定是占不了便宜。赢了微利，却失了大贵。再好的东西，也不可能长久拥有，不必计一时回赠，莫如常怀怜悯之情，常施援助之爱，得到人心，他物不缺。莫要以为成败无因，今天的苦果，是昨天所播之种;当下的付出，是明日的善报。。

我们这个专题的内容是字符串String的处理，在我的各套教程中一直把字符串处理作为一项非常重要的知识点来讲解。对于VBA语言而言，字符串操作是编程中的关键技能。VBA 开发人员的技能水平通常取决于他操纵字符串的程度。Excel 在数学操作方面非常强大，但文本操作却需要我们具有一定的创造力和经验。

在本专题中，我将向展示如何从字符串中删除字符，学习如何通过替换、左、右、修剪和 Instr函数功能来处理它们。

我们继续延伸一下这种删除字符的操作，这里我们要研究的是在给定的字符串中如何删除指定个数的字符，这种操作就是要利用上面语法中的后半部分了，我们再来回顾一下Replace语法：

语法：Replace(expression, find, replace, [ start, [ count, [ compare ]]])

这个语法中的后半部分中的参数count 指的就是要删除字符串的个数，我们来看一下这个参数的具体用法。

实例三：删除指定个数的字符

这个实例中，我们将在字符串"aabbccaabbcc"中删除前三个"b"字符，在代码的书写中只需指定参数count为3即可，我们预期输出的结果为"aaccaabcc"。下面看我给出的代码：

Sub mynzC()

Dim myInput As String

Dim myRemove As String

Dim myResult As String

myInput = "aabbccaabbcc"

myRemove = "b"

'从输入字符串中删除前3个出现的“b”

myResult = Replace(myInput, myRemove, "", , 3)

MsgBox myResult

End Sub

代码截图：

代码的讲解：Replace(myInput, myRemove, "", , 3) 这句代码在书写的时候注意要留出start参数的位置。Replace(myInput, myRemove, "", , 3)。

代码的运行结果：

以上代码是符合我们预期的。

待续

本讲内容参考程序文件：应用007.xlsm

我20多年的VBA实践经验，全部浓缩在下面的各个教程中：