计算自动化

zhangstone

各位高手：

     我遇到一个自动计算的难题，背景说明:
1、工作薄中有6个表，每个表有5个颜色区域：深蓝、浅灰、深灰、浅黄、深黄，6个工作表都是同一个模版
2、形状“点击”指定了相关的宏，我给每个区域上边都放置了一个形状“点击”。
要求如下：
一、在每个表做相同的操作
二、以表1为例：
1、首先点击形状“点击”，打开对话框，选择计算单元格：左上角蓝色区域上边的单元格A1，确定后，选择输出结果的单元格：下边蓝色区域【A1】所在的单元格，然后点击确定；
2、再次点击形状“点击”，打开对话框，选择计算单元格：左上角蓝色区域上边的单元格A2，确定后，选择输出结果的单元格：下边蓝色区域【A7】所在的单元格，然后点击确定；
3、给下边蓝色区域【A1】所在的数值范围（单列）做升序排列；
4、双击【A3】与【A4】对应的单元格，下拉公式
5、依照上边的顺序依次将同一个表中深蓝、浅灰、深灰、浅黄、深黄等5个区域的数据计算完毕
三、表2-表6同上操作

我本来想通过宏录制来实现上述自动化操作，但是目前的宏录制做了限制：在录制过程中不允许我点击形状“点击”，各位大神有什么好办法吗？实现上述内容的自动化操作。

laoye5403

参与一下,练手!
一张表五种颜色一个按钮弄完。难道非要分开，那你取消循环。
两种方式: 一种在表里填入公式, 一种直接搞定。
采用的简单排序,速度慢