求excel公式,有圖

時間 2022-03-12 09:00:15

1樓:匿名使用者

sub 列出符合尾數的組合()

dim i as integer

dim r as integer

dim n1 as integer

dim n2 as integer

dim in1 as byte

dim in2 as byte

r = cells(rows.count, 1).end(xlup).row - 1

for i = 3 to r

n1 = worksheetfunction.count(range(cells(i + 1, 3), cells(i + 1, 8)))

for in1 = 1 to n1 - 1

for in2 = in1 + 1 to n1

if cbyte(right(cells(i + 1, in1 + 2) + cells(i + 1, in2 + 2), 1)) = cbyte(cells(i, 1)) then _

cells(i, 10 + n2) = cells(i + 1, in1 + 2).value & cells(i + 1, in2 + 2).value & "v":

 n2 = n2 + 1

next

next

if cells(i, 10) = "" then cells(i, 10) = "無"

n2 = 0

next

end sub

函式很難做到你的要求,用excel裡的vba就可以

開啟excel,按alt+f11,出現在乙個視窗,如下圖

點選插入-模組-然後複製上面**進去,

然後在你的工作表裡執行**(就是執行巨集,由於你是03版本的,我不知道在**,你自己上網找一下)就可以了

2樓:匿名使用者

試試附件

希望能幫到你

求一excel公式

k2公式 value right large countif offset a 1,count a a 30,30 row 1 10 100 row 1 10 column a1 2 使用組公式 k3公式 round countif offset a 1,count a a 30,30 k2 30 ...

excel公式求餘數怎麼設定,excel怎麼求餘數

哈文玉清媼 取餘數函式 mod 數值,除數 由於除以5的餘數是0到4,所以要出1 5,公式是 mod a1 1,5 1 如果只要迴圈顯示1 5,不用a列,直接用公式 mod row 1,5 1 就是用所在單元格的行數直接算餘數 塞寧禰雨 excel中無法直接設定顯示餘數,但是可以使用mod函式取餘數...

EXCEL 07求函式公式

e3 sumproduct mid b3,3 f3 sumproduct mid b3,1 不過公式對b3單元格有要求,前面和後面不能有空格,中間只能各有乙個空格,只能有5個號碼資料。在e3中寫入公式 sum mid b3,2 下拉複製公式。在f3中寫入公式 sum mid b3,1 下拉複製公式。...