VBA怎样实现单元格条件格式的条件的更改

yhaso

VBA怎样实现单元格条件格式的条件的更改，如果B列的单元格条件格式的判断条件中$B$后都为1，怎样对应改为单元格所在的行号，2，3，4，5等等系列，$B$不变
举个例子：假如我B2单元格条件格式的两个判断公式为=$B$1>90
                                                                           =$B$1<70

怎样用VBA更改为=$B$2>90
                         =$B$2<70

蓝桥玄霜

建议用录制宏的方法获得代码。

yhaso

蓝桥玄霜 发表于 2018-9-26 08:58
建议用录制宏的方法获得代码。

具体怎样呢？能举个例子吗

yhaso

要求：B2-B24类似批量改，判断值是每列每个单元格不同的，没有规律的，B列的条件里$A$1改成对应单元格的位置$B$2、$B$3、$B$4.。。就可以?条件<>后的判断值是原来就设定好的，不能改变。例如，B列条件格式的原来条件为 B3 条件格式的条件： =$A$1<88.55475和  =$A$1>99.1754 B4 条件格式的条件： =$A$1<67.57574和  =$A$1>77.1757 B5 条件格式的条件： =$A$1<78.57524和  =$A$1>88.1542 B6 条件格式的条件： =$A$1<52.5745和   =$A$1>73.1752 B7 条件格式的条件： =$A$1<42.55442和  =$A$1>63.1385 B8 条件格式的条件： =$A$1<22.555和   =$A$1>53.1747 B9 条件格式的条件： =$A$1<32.525和   =$A$1>83.1774 B10 条件格式的条件：=$A$1<64.574和   =$A$1>73.163 。。。。。。。。 B23 条件格式的条件：=$A$1<80.7和     =$A$1>83.2 B24 条件格式的条件：=$A$1<72.5和     =$A$1>93.1   B列批量改为要求条件格式的条件：  B2 条件格式的条件： =$B$2<72.554和    =$B$2>93.174 B3 条件格式的条件 ：=$B$3<88.55475和  =$B$3>99.1754 B4 条件格式的条件： =$B$4<67.57574和  =$B$4>77.1757 B5 条件格式的条件： =$B$5<78.57524和  =$B$5>88.1542 B6 条件格式的条件： =$B$6<52.5745和   =$B$6>73.1752 B7 条件格式的条件： =$B$7<42.55442和   =$B$7>63.1385 B8 条件格式的条件： =$B$8<22.555和    =$B$8>53.1747 B9 条件格式的条件： =$B$9<32.525和     =$B$9>83.1774 B10 条件格式的条件：=$B$10<64.574和    =$B$10>73.163 。。。。。。。。 B23 条件格式的条件：=$B$23<80.7和     =$B$23>83.2 B24 条件格式的条件：=$B$24<72.5和     =$B$24>93.1