Excel中如何按照一組無規律文字中的數字排序(高手指點,多謝)

時間 2021-06-26 18:26:22

1樓:匿名使用者

b1=-lookup(,-mid(a1,match(true,isnumber(1*mid(a1,row($1:$20),1)),0),row($1:$20)))

按ctrl+shift+enter結束公式輸入,下拉填充

然後選中ab兩列,以b列數字為主關鍵字進行排序。

2樓:匿名使用者

開啟excel---按 alt+f11---左邊雙擊你這組資料所在的表 如 sheet1,在彈出的視窗裡面複製**進去,按 f5執行。

如果還是不會,可以把表發我郵箱,我幫你放進去。

sub 排序()

dim i as long, j as long, arr()

dim n as long

for i = 1 to range("b65536").end(xlup).row

for j = 1 to len(range("b" & i).text)

if isnumeric(mid(range("b" & i).text, j, 1)) then

redim preserve arr(n)

arr(n) = val(mid(range("b" & i).text, j)) & "," & range("b" & i).text

n = n + 1

exit for

end if

next

next

call paixu(arr)

for i = 0 to ubound(arr)

range("b" & i + 1) = split(arr(i), ",")(1)

next

end sub

private function paixu(byref arr()) '冒泡法排序

for i = ubound(arr) to lbound(arr) step -1

for j = lbound(arr) to i - 1

if val(arr(i)) < val(arr(j)) then

temp = arr(i)

arr(i) = arr(j)

arr(j) = temp

end if

next

next

end function

請教高手:用excel怎樣給一組數字排序?謝謝指點! 10

Excel中如何在一單元格隨意輸入一組小寫金額,在另單元格會自動顯示其大寫金額

假如輸入的小寫金額在a1單元格,公式 if a1 0,if int a1 text trunc a1 dbnum2 元 if mod a1,1 0,整 if trunc a1,1 if a1 trunc a1,1 text left right a1 100,2 dbnum2 0角整角 0分 tex...

excel中如何將一組資料進行組合數字1 8進行組合,每組數字,是否有公式可以直接導用

可用函式 combin 8,6 算出組數28用程式得出各組合 sub eightsix for i1 1to 3 for i2 i1 1 to 4 for i3 i2 1 to 5 for i4 i3 1 to 6 for i5 i4 1 to 7 for i6 i5 1 to 8 m m 1 ra...

如何在excel裡生成一組資料,要求cpk大於

我是來嚇寶寶的 不斷把相關資料代入公式,計算,過程中用excel表調整資料 不斷調整相關引數,得不同得cpk值 看什麼條件才能達到客戶得要求 cpk complex process capability index 的縮寫,是現代企業用於表示製成能力的指標。cpk值越大表示品質越佳。cpk min ...