mmmmmm 发表于 2005-6-19 14:35:00

[求助]求一个Excel内的VBA

<FONT face=宋体 size=2>工作表数据有两列，A为数据，B为数据的ID（整数）。<BR>另外有一个数据ID范围的定义（如：1000以内属于XXX，1000~2900属于YYY等）<BR>求一个Excel内的VBA，直接在C列输出数据ID所属的XXX或YYY等。<BR><BR>因为范围定义数据较大，只需要给个示范程序的框架代码就行了，数据可以先按要求自由定义。<BR>最后的程序我自己填补完成。</FONT>

cqy 发表于 2005-6-20 13:58:00

dim n as insteger


for n=1 to 100


if cells(n,2)&lt;1000 then


cells(n,3).value=XXX


else


cells(n,3).value=YYYY


end if


next

sinceret 发表于 2009-2-6 19:51:00

<p>我的原则是能不用VBA就不用VBA，你这个想法可以用函数vlookup实现</p><p>在D1:D3分别输入 0，1000，3000；</p><p>在E1:E3分别输入 XXX，YYY，ZZZ；</p><p>在c1输入公式=if(iserror(vlookup(B1,$D$1:$E$3,2)),"没找到",vlookup(B1,$D$1:$E$3,2))</p><p></p>

yshf 发表于 2009-3-22 09:10:00

<p>在C1单元格内输入：=IF(B1&lt;1000,"XXX",IF(AND(B1&gt;=1000,B1&lt;=2900),"YYY","不知道"))</p><p>回车后,向下填充不就行了！</p>

LIULISHENG 发表于 2017-9-26 10:11:09

学习了支持下
页: [1]
查看完整版本: [求助]求一个Excel内的VBA