2014-04-28 82 views
0

我正在使用以下代碼讀出Microsoft中單元格的內容使用VBA的Microsoft Excel演講 - 講多個項目?

Excel。

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

End Sub 

我想現在讀出幾個單元格的內容作爲

句子的一部分。

FOR EXAMPLE

如果A1包含姓名和B1包含任何「晨報」的價值,

「下午」或「傍晚」爲文本,然後我想在PC上發言

以下那麼子警告叫

「早上好,John Doe,今天好嗎?

我嘗試添加在.value("Good morning")閱讀李四位之前,

,但我不能讓它一次讀不止一兩件事。

任何人都可以幫忙嗎?

謝謝

回答

1

調用Speech對象,而不是直接通過Range

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

這將讀取列中的文本答:

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