如何编辑列中的文字?

时间:2015-06-10 14:06:10

标签: vba formatting editing

我列中的数据如下所述列出。

A  B
1  N  
2  N  
3  N        
4  Y   
5  Y   
6  N   
7  N   
8  Y    
9  Y   
10 Y    
11 Y   
12 Y   
13 N   
14 N   

我想自动化并列出第一个n而没有其他n直到y出现并列出第一个y直到出现下一个n。 像这样:

A  B
1  N  
2   
3          
4  Y   
5     
6  N   
7     
8  Y    
9     
10     
11    
12    
13 N   
14  

任何帮助都是相关的。

1 个答案:

答案 0 :(得分:0)

除非我不知道有一种棘手的方法,否则你需要编写一个循环遍历列中行的宏,检查要更改的值。伪代码:

set a compare variable to null
loop through cells in the column
  read cell
  if cell value != compare variable
    compare = new value
    - leave cell value there
  else if cell = compare
    cell value = NULL
end loop

让我们知道你的想法。