What am I missing so the sound will play when this command button is chosen

Private Sub CommandButton1_Click(
Sheets("Forecast").Selec
Sheets("Forecast").Range("A1").Selec
SoundNote.Import("C:/Program Files/Netscape/Communicator/Program/AIM/Sounds/dooropen.wav").Pla
End Su

Thank you for your help