[我急需关于团结的主题班会的PPT知道的一定要告诉我谢谢！]一、设计理念： 活动课必须立足于每一个学生的个体的整体性，立足于学生的健全发展。 活动课应以活动为主要开展形式，强调学生的亲身经历，要求学生积极参与一系列的活动中去，在活动...+阅读

没明白，你的rng1不是城市么，应该是要在sheet1中查B列，为啥去查C列呢（rng1.Find(.Range(＂C＂ & i)）），同样rng2不是车型么，为啥去查sheet1的E列呢（图一没截全，不知道你的E列是指啥），另外就是你的sheet1是从B3到B7，而不是从4开始，另外你要考虑没有查到的情况，代码应该类似于这样

i = 3

With Worksheets(1)

Do While .Range(＂B＂ & i) ＂＂

Set result = rng1.Find(.Range(＂B＂ & i))

If Not result Is Nothing Then '如果找到了才做处理

MsgBox result.row

End If

以下为关联文档：

小跳蛙歌词歌词啊！！谢谢小跳蛙 - 青蛙乐队 词：彭钧/李润 曲：彭钧 快乐池塘栽种了 梦想就变成海洋 鼓的眼睛大嘴巴 同样唱的响亮 借我一双小翅膀 就能飞向太阳 我相信 奇迹就在身上 啦啦啦啦啦 啦啦啦...

新车购置税计算公式是什么在上面的购置税计算公式中，车辆不含税价格是指车辆价格减去增值税之后的价格，而并非买车时发票上的价格，这一点需要特别注意。实际缴纳购置税的时候，车主需要按当地车管所内部数...

高中会考：物理化学生物会考知识点总结公式方程式非金属单质（F2 ,Cl2 , O2 , S, N2 , P , C , Si） 1， 氧化性： F2 + H2 === 2HF F2 +Xe（过量）===XeF2 2F2（过量）+Xe===XeF4 nF2 +2M===2MFn （表示大部分金属） 2F2 +2H2O===4HF+O2 2F2 +2...

急求走进文学作文一篇谢谢积累，让我步入文学的殿堂 临寒怒放，傲视冰霜。“零落成泥碾作尘，只有香如故”那是刚毅的腊梅。 随风摇曳，威武不屈。“千磨万击还坚劲，任尔东西南北风”那是仓翠的石竹。 亭亭玉...

征文中国梦文学梦为主题畅想未来！谢谢了！当年华撒落了一地的花瓣，唯有您，跨越了时间与空间的距离，飞过了现实与梦想的差距。没有了国界，没有了季节，您让世界插上羽翼。----题记恩师之情我说，恩师是流水，亘古不变地流着，从历...

Excel VBA公式Sub test() '这段代码是用来去除A列+B列的双条件重复值 Dim r%, i% '定义变量 Dim arr, brr '定义变量 Dim d As Object '定义变量 Set d = CreateObject(＂scripting.diction...

用VBA在excel中插入函数公式Sub Macro1() X = [A65536].End(3).Row Range(＂B2＂).FormulaR1C1 = ＂=IF(RC[-1]=＂＂＂＂,＂＂＂＂,TEXT(RC[-1],＂＂AAAA＂＂))＂ Range(＂B2＂).AutoFill Destination:=Range(＂B2:B＂ & X) Range(＂B2:B＂ & X) = R...

excel vba代码中加入公式并填充公式软件版本：Office2007 方法如下： 1.利用VBA在C列中加入公式求AB列的和，并且填充公式至所有有数据的行： 2.Alt+F11，输入代码如下： 3.F5执行代码，返回Excel，得到结果如下：...

excel vba排列组合公式写法Sub test() Dim a As Integer, b As Integer, c As Integer, d As Integer, e As Integer, f As Integer, g As Integer, h As Integer Dim k As Long Dim xxr k = 0 For a...