填充列,直到文本在彩色单元格中更改

时间:2015-01-26 19:40:51

标签: excel excel-vba excel-formula vba

我在Excel中有大约100,000行数据,在C列中有一些彩色单元格,我想在B列中重复填充,直到彩色单元格包含不同的文本,当我想填充不同的文本时,等等。 : -

在:

http://i61.tinypic.com/24q758n.png

后:

http://i59.tinypic.com/t6as9l.png

我可以使用任何宏,VB脚本或“IF”语句吗?如果通过复制'粘贴完成,这似乎是一生的时间。

2 个答案:

答案 0 :(得分:1)

过滤以选择彩色单元格,例如在ColumnB中。在ColumnA中插入=Bx,其中x是已着色的第一行的行号(如果需要,重复其他颜色)。然后在顶部选择ColumnA,Copy,Paste Special,Values,然后选择Ax to end,HOME>编辑 - 发现&选择,转到特殊...,选中空白,=,向上,按Ctrl + Enter。

答案 1 :(得分:1)

  1. 选择列C并选择数据►排序&过滤器►自动过滤器。使用C1中的过滤器下拉菜单按颜色过滤
  2. 在B2中输入公式=C2并填写数据范围。
  3. 点击数据►排序&过滤器►自动过滤器以移除过滤器。
  4. 首先选择B2到数据底部,然后点击 F5 ,点击 Special 并选择空白然后点击确定
  5. B3应该是活跃的细胞。键入=B2并使用 Ctrl + Enter 完成公式。这将使用该公式的相对副本填充所有空白单元格。
  6. 应按照您的描述填充B列。 (可选)使用复制,然后使用选择性粘贴,值将公式恢复为其结果。可选择将色谱柱B与C2相同。