flexworks的专栏

      将Sheet3 和Sheet5 中的数据项同时按关键列排序, 一般默认按A-Z升序排列.  (关于数组的排序可以参考高效的QuickSort排序算法). 在此不将Sheet3 和Sheet5 的排序的时间计算在内.      下面先给出按指定名称建立新Sheet的函数, 若不存在指定名称的Sheet, 则新建;  若Sheet已存在且用户同意删除, 则删除后新建一页Sheet, 若

    工作需要，有时要从Excel的两页中提取一些共同的数据项出来分析, 而两页中的数据都没有按某关键列排过过序,  简单的用VBA写了一个抽取数据的方法:Sheet6 中存放Sheet3 和 Sheet5中相同的数据项.   public Sub GetMixedInfo()Dim i As IntegerDim j As IntegerDim keyword As Str