行號查詢(行號查詢網(wǎng)點查詢系統(tǒng))

例題描述

Excel文件中有一列數(shù)值，需要找出數(shù)字10出現(xiàn)以后第一次出現(xiàn)單數(shù)時與它之間的間隔行數(shù)。如下圖所示：

1、 運行集算器

可去潤乾官網(wǎng)下載職場版，同時下載一個免費授權就夠了，首次運行時會提示加載。

2、 編寫腳本：

把代碼列出來看得清楚點：

A

1

=clipboard().split(" ").(int(~))

2

=A1.(null)

3

=A1.run(if(~==10,(x=~[1:].plect(~%2==1),A2(#+x)=x)))

4

=clipboard(A2.export())

A1 從剪貼板里讀取數(shù)據(jù)，按換行符 拆分成序列并轉(zhuǎn)換成整數(shù)

A2 定義一個與A1大小相同的序列用來保存結(jié)果，賦初值為空

A3 循環(huán)A1的每個數(shù)，計算：如果當前數(shù)是10，則從它后面的數(shù)中選出第1個單數(shù)的序號賦給x，再將結(jié)果序列中第#+x個成員值設為x。其中~[1:]表示當前數(shù)的下一個到最后一個組成的序列，#表示A1中當前數(shù)的序號。

A4 將A2序列轉(zhuǎn)換成字符串放進剪貼板中

3、 代碼寫好以后，到Excel文件里選擇數(shù)值列A2-A16，然后按Ctrl+C復制到剪貼板。

回到集算器，按F9運行程序，運行結(jié)束后再回到Excel文件，點擊B2，按Ctrl+V就可以把間隔列的數(shù)據(jù)粘貼過來。