Excel VBA-如果单元格包含文本复制粘贴到另一行(不均匀间距)

时间:2017-07-05 13:49:06

标签: excel vba excel-vba

我是VBA的新手,我已经被要求提出一个宏(或者给我自动化的术语)来过滤我的工作簿中包含" Total"的所有行。 &安培; "平均"超过一个月的时间,并调整2个单元格的位置,以符合另一行。现在我可以正常过滤我需要过滤但我的问题在于我需要如何格式化导出。我需要它从这个

e.g

 COL1       |   COL2   |    COL3   |  COL4
Report Date:| xx/xx/xx |   (BLANK) | (BLANK)
-------------
Service Group:| Repayments |
-------------
Total    xx | xx    | xx
-----------
Average     |  xx   |    xx

对此。

   COL1     | COL2     |    COL3       | COL4  |
Report Date:| xx/xx/xx | Service Group:| Repayments 
--------
Total       |  xx      |   xx          |  xx
--------
Average     |  xx      |   xx          |  xx

我遇到的问题(除了对VBA来说是一个全新的问题)是如何让它成为"自动化"我有一个想法是将一个宏分配给一个按钮,当按下该按钮时,会切断粘贴(然后删除空白区域)(Service Group :)&的每个实例。 (还款)上升1行,超过3列  所以对于另一个例子:在过滤器之后,行将按不同的方式编号,因此从位置开始:B6& C6移动一个和三个以上位置E5& F5

对于我试过TLDR的冗长曲折的解释感到抱歉,但我想不出更好地描述它的方法。编辑1.数据也是非顺序的

0 个答案:

没有答案