Sub test()
Dim arr,x&,y&,i&,Str1$
arr = Range("A1:D9").Value
For x = 1 To UBound(arr)
For y = 1 To UBound(arr)
If arr(x,2) + arr(y,4) = 11 Then
i = i + 1
Str1 = Str1 & "," & arr(x,1) & "和" & arr(y,3)
End If
Next y
Next x
MsgBox "共" & i & "組,對(duì)應(yīng)A和C的值為：" & Mid(Str1,2,Len(Str1))
End Sub
Exce中 A1到A9與B1到B9單元格對(duì)應(yīng),C1到C9與D1到D9單元格對(duì)應(yīng),B列與D列循環(huán)相加結(jié)果為11時(shí),求A C的數(shù)值是多少?有多少組?用VBA代碼如何編寫?
Exce中 A1到A9與B1到B9單元格對(duì)應(yīng),C1到C9與D1到D9單元格對(duì)應(yīng),B列與D列循環(huán)相加結(jié)果為11時(shí),求A C的數(shù)值是多少?有多少組?用VBA代碼如何編寫?
其他人氣：175 ℃時(shí)間：2020-01-31 04:10:05
優(yōu)質(zhì)解答
我來(lái)回答
類似推薦
- =SUMPRODUCT((A2:A9="廣")*(B2:B9="3#")*(C2:C9="12")*(G2:G9="5260")*D2:D9) 結(jié)果為0,請(qǐng)高手看看那里出
- [(a1+a9）×9÷2]/[(b1+b9)×9÷2]怎么得到下一步?
- 等差數(shù)列｛a(n)}和等比數(shù)列｛b(n)｝的各項(xiàng)均為正數(shù),且a1=b1,a9=b9,a1=/b9'則a5,b5的大小比是
- 選擇：已知一組數(shù)據(jù)9、21、18、9、10、7、9,這組數(shù)據(jù)的眾數(shù)和中位數(shù)分別是（）.A9和9、B9和10、C9和9.5.
- 黃岡小狀元數(shù)學(xué)六年級(jí)上42頁(yè)第6題
- "臺(tái)上三分釧,臺(tái)下十年攻.”和“____”是一個(gè)道理
- 用C語(yǔ)言寫一程序,要求輸入10個(gè)數(shù),輸出這10個(gè)數(shù)中最大的那個(gè)數(shù),同時(shí)輸出這10個(gè)數(shù)的平均值
- 某名牌連鎖店出售一種會(huì)員卡,花20元購(gòu)買這種會(huì)員卡后,憑會(huì)員卡在名牌店的任意連鎖店享受折上折優(yōu)惠.
- 高爾夫球的表面為什么有坑
- I remember my daughter used to ask questions that girls__would ask.A.twice her age...
- 有理數(shù)用Q來(lái)表示,那無(wú)理數(shù)呢?用沒(méi)有規(guī)定的符號(hào)
- 狂急,上?？茖W(xué)科技出版社的
猜你喜歡
- 1茶幾面都有哪些材料的
- 2如圖為某有機(jī)物的結(jié)構(gòu)簡(jiǎn)式.已知酯類在銅鉻氧化物（CuO?CuCrO4）催化下，與氫氣反應(yīng)得到醇，羰基雙鍵可同時(shí)被還原，但苯環(huán)在催化氫化過(guò)程中不變，其反應(yīng)原理如下：在銅鉻氧化物催化下
- 3小明沿著一個(gè)圓形水池的外沿走了一周，正好走了50步，每步的距離約是0.628米，這個(gè)水池的占地面積大約是_平方米．
- 450以內(nèi)12的倍數(shù)
- 5某經(jīng)商銷售一種商品 把它的進(jìn)價(jià)提高40％后作為標(biāo)價(jià) 如果想獲得12％的利潤(rùn) 問(wèn)要打幾折?
- 6Some of the things some people,only to miss
- 7數(shù)學(xué)的連比（形如a:b:c）,其中a,b,c可以為負(fù)嗎?例如：-1:2:（-3）和-1:2:3.
- 8請(qǐng)高手幫我寫一篇英語(yǔ)短文故事
- 9過(guò)y^2=2px(x>0)上一點(diǎn)P(x0,y0)(y0>0)作兩直線分別交拋物線于A(X1,Y1)B(X2,Y2)1)求拋物線上縱坐標(biāo)為0.5p的點(diǎn)到其焦點(diǎn)F的距離2）當(dāng)PA、PB斜率存在且傾斜角互補(bǔ)時(shí)求（y1+y2）/y0的值,并證明直線
- 10我國(guó)古代有一位以半部《論語(yǔ)》治天下的名人.他是誰(shuí)?
- 11fly的現(xiàn)在進(jìn)行時(shí)態(tài)是FLYING嗎
- 12英語(yǔ) 仔細(xì)答題I want to go to Paris where I can learn the French language.