title: VBA Excel show the result of a combo box in a cell
body: <p>I want to show the value of a combo box in a cell. When I select a combo box, the value of it should be shown in a cell.<br>
  My code doesn't work:<br></p>
  
  <pre><code>Private Sub ComboBox1_Change()
      With Sheet3.ComboBox1
          .Clear
          For Each Cell In Range("A1:A15")
             .AddItem Cell.Value
          Next
      End With
  
      index = ComboBox1.Value
      Set car = Cells(1, 4)
      Cells(1, 4).Value = index
  End Sub
  </code></pre>