Excel神奇的输入自动替换，原来就是这么简单!

昨天经过大神的办公桌时，无意中看见大神在Excel单元格中输入供应商代码，一按回车，单元格内容马上变成了供应商的公司名称。我震惊了，感觉好神奇啊。我说为什么大神每次填单子都是又快又准确呢？原来他不需要用键盘输入长长的供应商公司的名字，而只是输入只有5个数字的供应商代码，就会自动转换为供应商公司的名字，还能保证不过出错！

我赶紧回到座位上查找相关资料，看看是如何实现的？不看不知道，原来实现起来也很简单。又学了一招。现在也迫不及待的分享给小伙伴们。具体实现效果如下：

是不是很神奇？很省时间？以后遇到很多会经常输入的东西，是不是都可以通过输入简单的编码实现？并且不会出错？

具体实现代码如下：

Private Sub Worksheet_Change(ByVal Target As Range)
Dim SupplierCode As String
Dim MyRng As Range
Dim i As Long
Dim ResultRng As Range
If Target.Column = 1 And Target.Row > 1 And Target.Value <>