在excel表中可隨即輸入整數,但在正負10範圍之內,且絕對值得平均值小於8,應該怎樣做?請賜教

2022-11-24 07:45:54 字數 638 閱讀 2449

1樓:匿名使用者

此問題的難點是:絕對值的平均值小於8,函式不好做到這點,我們用vba吧:

滑鼠右擊sheet1的標籤,點【檢視**】,在**視窗貼上線面的**:

sub ouyangff()

dim a(10)

s = 100

while s >= 80

s = 0

for i = 1 to 10

a(i) = int(rnd() * 21) - 10

s = s + abs(a(i))

next

wend

for i = 1 to 10

cells(i, 1) = a(i)

next

end sub

按f5執行程式,按alt + f11,回到excel,你要的數就在a1:a10 單元格里

如果要求絕對值的平均值小於4,將 while s >= 80 改為 while s >= 40 即可

你還可以在excel 中設定一個按鈕,並指向上面的程式,每點一次按鈕,就會得到一組新的資料!

2樓:excelvba學習

=randbetween(-10,10)

絕對值得平均值小於8這個沒法保證!

excel在表一輸入多條件提取表二符合的另外資料

在sheet2的e2中輸入或複製貼上此公式 sumproduct sheet1 a 2 a 999 a2 sheet1 b 2 b 999 b2 sheet1 c 2 c 999 c2 sheet1 d 2 d 999 d2 sheet1 e 2 e 999 下拉填充 在sheet2的f2中輸入或複...

Excel表中輸入不了漢字的無論用什麼輸入法都寫不進漢字,重灌系統也沒用,請教

是不是選的字型不對,是不是2007選單轉換為2003選單的那個外掛引起的 機子是hp的商用機嗎?若是它自帶的pdf complete跟excel有衝突,將它解除安裝後就能正常使用了!這個如果不行,解除安裝極點五筆試試,這個輸入法與不能在execl裡面輸入漢字也有案例 再不行,試試解除安裝google...

EXCEL表中,我如何輸入總數分成31份呢

說個原理吧。50000 31 1612.9以1613為基數,取15個在正300範圍內的隨機數再取15個在負300範圍內的隨機數 最後一個數字用50000去減獲得。sample a1中輸入50000 b1中輸入 1613 rand 300 c1中輸入 1613 rand 300 拖拽15行 第31個數...