Sub playmusic()Dim MyFile As StringMyFile = "D:\Yousef Zamani - Hakeme Shahre Delam (320).Mp3"ActiveWorkbook.FollowHyperlink Address:=MyFileEnd Sub
کامنت