使用VBA的Microsoft Excel演讲 - 讲多个项目？

Question

我正在使用以下代码读出Microsoft中单元格的内容

Excel。

Sub Warning() 
With Range("A1") 
    .Speak 
    End With 

End Sub 

我想现在读出几个单元格的内容作为

句子的一部分。

FOR EXAMPLE

如果A1包含姓名和B1包含任何“晨报”的价值，

“下午”或“傍晚”为文本，然后我想在PC上发言

以下那么子警告叫

“早上好，John Doe，今天好吗？

我尝试添加在.value("Good morning")阅读李四位之前，

，但我不能让它一次读不止一两件事。

任何人都可以帮忙吗？

谢谢

Answer 1

调用Speech对象，而不是直接通过Range：

Application.Speech.Speak "Good " & Range("B1").Value & " " & Range("A1").Value & ", How are you today?" 

Answer 2

这将读取列中的文本答：

Sub Recite() 
    L = Cells(Rows.Count, "A").End(xlUp).Row 
    For n = 1 To L 
     Cells(n, 1).Speak 
    Next n 
End Sub