在工作中，當我們需要在一個單元格中取隨機數時，有時候又要求該隨機數不能與其他固定數值的單元格重復。這個問題可以通過使用Excel的隨機函數來解決，如rand()和randbetween()。但是，如何

在工作中，當我們需要在一個單元格中取隨機數時，有時候又要求該隨機數不能與其他固定數值的單元格重復。這個問題可以通過使用Excel的隨機函數來解決，如rand()和randbetween()。但是，如何確保隨機數不與特定單元格的數值重復呢？接下來我們將介紹一種使用VBA編寫的方法來實現這個需求。

VBA編寫方法

首先，我們打開Excel并按下快捷鍵 "Alt F11" 來打開VBA窗口。

然后，在VBA窗口的右側子窗口中輸入以下代碼：

Public Sub GenerateRandomNumber()
    Dim randomNum As Range
    Set randomNum  Range("D1")
    
line1:
    
    Randomize
    randomNum  Int(Rnd * 5)   1
    
    If randomNum  Range("A1") Or randomNum  Range("B1") Then
        GoTo line1
    End If
End Sub

完成以上代碼的輸入后，你可以點擊運行按鈕（就像一個播放圖標）進行試運行，并保存你的VBA宏。

為了方便驗證，你可以給該宏添加一個快捷鍵。在VBA窗口中，選擇你的宏，然后點擊工具欄上的“設置快捷鍵”圖標，給它設置一個快捷鍵，例如“Ctrl s”?，F在，你只需要按下“Ctrl s”就可以快速運行該宏/程序了。

以上就是使用VBA編寫的方法來實現在Excel中取不包含某些單元格數值的隨機數的過程。這個方法能夠確保所取得的隨機數不會與指定單元格的數值重復，滿足了我們的要求。