Quantcast
Channel: Active questions tagged excel - Stack Overflow
Viewing all articles
Browse latest Browse all 88066

Userform Combobox plays song in media player based on its value

$
0
0

Need help on this. I have combobox which links to sheet that will show default value based on Column A value. Example,

A| Twinkle Star | BY Ali

B| ABC Song | By Kim

C| 123 Song | By Els

If i choose A, in userform will shows the twinkle star and by ali in text box. I would like to set if A is chosen, it will play Twinkle Star song, when B is chosen, it wil play ABC Song. Need your opinion please.

    Private Sub UserForm_Initialize()
    Set xRg = Worksheets("Sheet4").Range("A2:C7")
    Me.ComboBox1.List = xRg.Columns(1).Value
End Sub
Private Sub ComboBox1_Change()
    Me.TextBox1.Text = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 2, False)
    Me.TextBox2.Text = Application.WorksheetFunction.VLookup(Me.ComboBox1.Value, xRg, 3, False)

    Select Case ComboBox1.Value
       Case "A"
            WindowsMediaPlayer1.Controls.Play= FollowHyperlink "#Sheet4!A2"
       Case "B"
            WindowsMediaPlayer1.Controls.Play= FollowHyperlink "#Sheet4!A3"
    End Select

End Sub

i tried using case a, b and links to hyperlink but not works.. appreciate your help guys.


Viewing all articles
Browse latest Browse all 88066

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>