=LOOKUP(9E+307,--MID(A1,MIN(FIND({1,2,3,4,5,6,7,8,9,0},A1&5^19)),ROW($1:$99)))同時按CTRL SHIFT 回車鍵或=IF(ISERROR(FIND("-",A1)),"","-")&MID(SUM(MID(101&A1,2+LARGE(ISNUMBER(-MID(1&A1,COLUMN(1:1),1))*COLUMN(1:1),ROW($1:$50)),1)*10^ROW($2:$51))%,2,15)再不行就用程式碼 如果都是一位數可用公式=MID(A1,FIND("個",A1)-1,1)

得用宏。同時按alt和f11進入宏介面，點選單的插入，模組，貼上如下程式碼：

subtest()

dimiasbyte

dimxrngasobject

cells(1,1)=int(rnd()*100)+1

fori=2to30

setxrng=range("a1:a"&i)

cells(i,1)=int(rnd()*100)+1

dowhileapplication.worksheetfunction.countif(xrng,cells(i,1))>1

cells(i,1)=int(rnd()*100)+1

loop

nexti

endsub

直接在此介面下按f5執行此宏，在a1到a30裡形成隨機數。