在excel中不包含一些單元格數(shù)值的隨機數(shù)方法介紹

發(fā)布時間：2015-11-02 10:17:04 作者：佚名

這篇教程是向腳本之家的朋友介紹在excel中不包含一些單元格數(shù)值的隨機數(shù)方法，教程真的很不錯，有需要的朋友可以過來參考一下，希望能對大家有所幫助

excel是辦公尤其是處理數(shù)據(jù)的一個好幫手,他能給需要進行各類數(shù)據(jù)處理提供很強大的支持，這是我在工作中遇到的一個問題，是這樣的，比如有兩個單元格有固定值，而另外還有一個單元格需要取隨機數(shù)，但又要求不要和那兩個有固定值得單元格重復(fù)。如何取呢？隨機函數(shù)？rand()和randbetween()都可以，但是一時間還真想不出滿足要求的寫法。于是我想用VBA編寫也許更簡單。于是就有了下文。

工具/原料

硬件：滿足允許要求的電腦

軟件：Office excel（我這里用的是Excel 2013版）

EXCEL集成工具箱 2013 V19.8 免費版

類型：辦公軟件
大小：50.6MB
語言：簡體中文
時間：2013-09-05

查看詳情

方法/步驟

這里為了方便驗證，我們將隨機數(shù)值盡量取小一點，如果你要大一些的隨機數(shù)，可以修改程序。

設(shè)在D1單元格里取隨機數(shù)（1——5之間），A1、B1單元格為有固定數(shù)值的單元格，當(dāng)然數(shù)值范圍也在1——5直接，否則毫無意義。

excel如何取不包含某些單元格數(shù)值的隨機數(shù)

要編寫VBA，首先就要打開VBA，打開VBA的方法不止一種，這里我們就使用最簡單最快捷的方式，使用快捷鍵吧。按“Alt+F11”打開VBA窗口。VBA窗口右側(cè)子窗口就是輸入代碼用的。

excel如何取不包含某些單元格數(shù)值的隨機數(shù)

輸入代碼，如下：

Public Sub btsj()Dim sjd As Range Set sjd = Range("D1")line1: sjd.ClearContents Randomize sjd = Int(Rnd * 5 + 1) If sjd = Range("A1") Or sjd = Range("B1") ThenGoTo line1End IfEnd Sub

excel如何取不包含某些單元格數(shù)值的隨機數(shù)