Ciao,
premetto che non sono un esperta di VB ma mi verrebbe da suggerirti di inserire il riferimento al foglio in cui vuoi posizionare i dati quando pigi il bottone. Hai già provato?
Ti riporto come proverei io:
codice:
Private Sub CommandButton1_Click()   
Path = ActiveWorkbook.Path & "primipiatti.xlsm" 
Select Case Sheets("resoconto").Cells(6, 5) = ComboBox1.SelectedText   
End Sub