Classe Speech - voz (Excel VBA)

Contém métodos e propriedades relacionados à voz. Para usar uma variável de classe Speech, ela primeiro precisa ser instanciada por exemplo


Dim spc as Speech
Set spc = Application.Speech

Direction

Retorna ou define a ordem na qual as células serão faladas. O valor da propriedade Direction é uma constante XlSpeakDirection . Leitura/gravação. Os valores de retorno possíveis são xlSpeakByColumns - Lê uma coluna, em seguida, move para a próxima coluna, xlSpeakByRows - Lê através de uma linha, em seguida, move para a próxima linha.


Application.Speech.Direction = xlSpeakByColumns

Speak

O Microsoft Excel reproduz a sequência de caracteres de texto que é passada como um argumento.

Speak (Text, SpeakAsync, SpeakXML, Purge)


Dim strText As String: strText = "Hello" 
Application.Speech.Speak Text:=strText

Arguments

O seguinte argumento é necessário

Text (String) - O texto a ser falado.

Optional arguments

Os seguintes argumentos são opcionais

SpeakAsync - True faz com que o texto seja falado de forma assíncrona (o método não esperará que o texto seja falado). False faz com que o texto seja falado de forma síncrona (o método aguarda o texto ser falado antes de continuar). O padrão é False

SpeakXML - True faz com que o texto seja interpretado como XML. False faz com que o texto não seja interpretado como XML, portanto, todas as marcas XML são lidas e não são interpretadas. O padrão é False

Purge (Boolean) - True faz com que a fala atual seja terminada e qualquer texto armazenado em buffer seja excluído antes que o texto seja falado. False não faz com que a fala atual seja terminada e não limpa o texto armazenado em buffer antes de o texto ser falado. O padrão é False.

SpeakCellOnEnter

O Microsoft Excel oferece suporte a um modo em que a célula ativa é falada quando a tecla Enter é pressionada ou quando a célula ativa termina de ser editada. A definição da propriedade SpeakCellOnEnter como true ativa esse modo. False o desativará. Boolean de leitura/gravação.


Application.Speech.SpeakCellOnEnter = True