I would like to create a command button that each time it's clicked will populate a cell with one number from the following list: (1,3,5,7,9). I'd also like to create a separate command button that will populate a different cell with one number from this list: (2,4,6,8) It's ok for the same numbers to appear again on subsequent clicks of their respective buttons.

Private Sub CommandButton1_Click()
Range("BH3") = WorksheetFunction.RandBetween(1, 9)
End Sub

works fine for selecting from the entire range of numbers between 1 & 9 but can't figure out how to select from just the odd and even numbers between 1 & 9.

If someone could provide some sample code to accomplish this it would be greatly appreciated.