VB代码运行太慢，求优化。

大量代码 *** 作控件或对象时，把对象先隐藏，代码完成了再显示，这样可以提高运行效率。

函数顶部加入newsheet.Visible=false

函数底部加入newsheet.Visible=true

首先，你这个数据的特点，这个速度肯定是快不起来的。

可以根据数据规律，适当做一些修改，你的数据并没有全部列出，所以我只能假设：

比如：

1010000 AA--0

1010001 AA--1

1010002 AA--2

1010003 AA--3

1010004 AA--4

1010005 AA--5

1010006 AA--6

1010007 AA--7

1010008 AA--8

1010009 AA--9

1010010 AA--10

1010011 AA--11

你的AA-NN一共有多少可能呢？

假设101对应AA

00000对应0

00001对应1

是不是全部数据都是这样的规律？

如果有这样的规律，那就可以不需要去全部用这样的循环，可以加快速度了！

假设：101 对应 AA

102对应BB

103对应CC

......

那就把类似与“1050015”这样的7位数据，拆分，前三位转换成大写字母，后四位转换成序数，再合并构成类似“EE-？？”的样子了，这样肯定速度快得多了！

你告诉我所有第1个表里的 编号 与 产品号 的对应关系？让我找找规律？

---