Question

如何利用Excel宏编写一个小程序 求助，谢谢！

最近工作需要领导要求我做一个小程序，在Excel里面编，而我无任何Excel 宏编写经验，只能靠以前的一些VB知识写一些，但不知道如何放到Excel 里，请大家帮忙！万分感激！ 这个程序的目的是为了计算流水线上物料的总冲洗次数 目前一共有四种物料：A B C D 流水线上四种物料源源不断流动冲洗，冲洗原则需满足两点： 1.前后是不同物料即冲洗 2.若前后为同一种物料则冲洗次数：A为1个1冲，B为3个一冲，C为4个一冲,D为6个一冲 举例为： 假设流水线上目前的物品为： A B C D 则冲洗次数为3 假设流水线上目前的物品为： A B B B B C D 则冲洗次数为4次（A到B冲一次，过了3个B后冲一次，B到C冲一次，C到D冲一次） 假设流水线上目前的物品为： B C C D D D D D D D D D DA A C 则冲洗次数为5次 以此类推 目前要做的就是，假设给流水线上四个物料以任意一种数量排序（无先后顺序）（即表格可以列成一列），需要计算总共的冲洗次数。 我的VB程序想法是：将流水线上所有物料做成excel一列，单元格分别为A1 A2 A3...A(i) If A（i+1）<>A(i), Then c=c+1 (c为计数) 除此以外： if A(i)=A(i+1)=A, then d=d+1(d为计数) if A(i)=A(i+1)=A(i+2)=B， then e=e+1, i=i+2 if A(i)=A(i+1)=A(i+2)=A(i+3)= C , then f=f+1, i=i+4 if A(i)=A(i+1)=A(i+2)=A(i+3)=A(i+4)=A(i+5)= D ,then g=g+1,i=i+6 最后计数的结果为: c+d+e+f+g 我这个vb编程想法很幼稚，我就是不知道在excel 宏里怎么编写语句，来求助各位大虾们，望帮忙，万分感激！！！！

Answer 1

要是会VB，编VBA就简单很多。
你的具体问题我没有看，只是想说一些基本的东西。
EXCEL主要调用的是Sheet对象和Cell
(或者说是Range)对象。
例如，Sheet1中的单元格A2可以用Sheet1.cells(2,1)调用，也可以用Sheet1.Range("A2")进行调用。