VBA和宏，批量替换，双层循环

gabjerome

请教各位高手，如何按照一数据库批量替换某单元格的数值，有双层的，如：
SHEET1
       A                      B                       C                              D
     123                  456                    789                           1234
先批量替换ABC数据，ABC  3个单元格数字在一起，再批量替换 D 的数据，数据从SHEET2  的 A1 B1 C1 D1 开始。
SHEET2
         A                         B                     C                              D
  1    123                    456                  789                         1234  
  2     223                   256                  289                         2234
  3     323                  356                  389                          3234
  4    423                    456                 489                         4234
  5     523                  556                  589                         5234
  6                                                                                    6234
  7                                                                                     7234
8                                                                                     8234
9                                                                                     9234
10                                                                                    0234
...........
1）：先替换A1、B1、C1三个,同时按照D 列数据批量替换，
2）同理，替换A2、B2、C2三个，再按照D列数据替换，
3）替换A3、B3、C3，再替换D列，一直类推（数据很多，这里省略），
SHEET2的全部数据只替换SHEET1单元格A1、B1、C1、D1的值。

帮忙写下代码，谢谢。

VBA-6.rar (172.14 KB, 下载次数: 8)

2012-8-22 18:25 上传

点击文件名下载附件

兰色幻想

用什么替换什么，替换后的效果是什么？

gabjerome

兰色幻想 发表于 2012-8-22 18:31
用什么替换什么，替换后的效果是什么？

效果像抽奖的滚动样，按照顺序出来一组ABC，接着D列按照数据顺序出来，再出来一组ABC，D列还是照那组数据从头开始按照顺序出来。
比如：
A      B    C      D
1      2     3     4
5      6     7       8
                        9
                       10
出来效果就是
1  2   3   4
1  2   3   8
1  2   3   9
1  2   3    10
5  6   7    4
5  6  7    8
5  6  7  9
5   6   7  10

在SHEET1单元格A1、B1、C1、D1里面显示。

w2001pf

gabjerome 发表于 2012-8-22 18:56
效果像抽奖的滚动样，按照顺序出来一组ABC，接着D列按照数据顺序出来，再出来一组ABC，D列还是照那组数 ...

你的要求还是没有说清楚的。如复制到SHEET2 相应位置是哪里？要解决问题，越详细越好，最好做出一个效果图出来。