excel vba 求助

水寒剑

各位大神 帮帮忙

笑着...两年过去

1. sub test()
   
2.       for i=1 to [a1].end(4).row
   
3.            if application.countif([c:c],cells(i,1))>0 then cells(i,1)=cells(i,1) & "（已发放）"
   
4.       next
   
5. end sub

复制代码

水寒剑

笑着...两年过去 发表于 2018-9-25 14:07

for i=1 to [a1].end(4).row
这里面end（4）括号里面“4”是什么参数，

水寒剑

笑着...两年过去 发表于 2018-9-25 14:07

我试了一下，a列的值  c列 没有  也会显示（发放）

笑着...两年过去

水寒剑 发表于 2018-9-25 14:16
for i=1 to [a1].end(4).row
这里面end（4）括号里面“4”是什么参数，

xlDown            

笑着...两年过去

水寒剑 发表于 2018-9-25 14:20
我试了一下，a列的值  c列 没有  也会显示（发放）

上个附件看看

水寒剑

好的，我之前可能没说清楚。不好意思！

水寒剑

笑着...两年过去 发表于 2018-9-25 14:36
上个附件看看

                  大神幸苦了                     

笑着...两年过去

新建 XLSX 工作表.zip (14.2 KB, 下载次数: 3)

2018-9-25 16:02 上传

点击文件名下载附件

见附件

freexiaobai

笑着...两年过去 发表于 2018-9-25 16:02
见附件

这个宏是在原来的第一列进行更改，如果 我需要在E列，列出结果，而不变动原来的数据，宏应该 怎么改？