摘要： 如果Excel表格中的某个区域有许多文本格式的邮件地址需要添加链接，用手工的方式非常繁琐。可以使用下面的VBA代码来快速添加链接，假设该区域为F2:F18。Excel利用用... 如果Excel表格中的某个区域有许多文本格式的邮件地址需要添加链接，用手工的方式非常繁琐。可以使用下面的VBA代码来快速添加链接，假设该区域为F2:F18。
Excel利用用VBA获取指定工作簿中的工作表名称
如果需要用VBA的方法获得某个工作簿中工作表的名称，可以使用下面的代码，其中使用了MicrosoftActiveXDataObjects(ADO)，可以将指定工作簿中的工作簿名称显示在A列中，在使用时需将代码中的工
Sub ConvertToEmail()
Dim convertRng As Range
Set convertRng = Range("F2:F18")
Dim rng As Range
For Each rng In convertRng
If rng.Value <> "" Then
ActiveSheet.Hyperlinks.Add rng, "mailto:" & rng.Value
End If
Next rng
End Sub
利用VBA在Excel中播放MP3音乐
在VBA中通过调用API函数mcisendstring，可以播放MP3格式的音乐。下面是VBA代码，我们可以将它放入模块中，方法是在VBA编辑器中单击菜单插入模块，在代码窗口中输入下列代码。OptionExplicitPubl
