Excel'de Taş Kağıt Makas

Dim Choice(1 To 3) As String
Dim YourChoice As String

Sub Rock()

    Range("C4").Value = "Rock"
    YourChoice = "Rock"
   
    PC_Choice
   
End Sub