shinta0806 / UtaYomi

唄詠:自動 HANASU ツール(SAPI 5 対応)
http://shinta.coresv.com/software/utayomi_jpn/
1 stars 0 forks source link

Windows10 でハングアップする #62

Open shinta0806 opened 6 years ago

shinta0806 commented 6 years ago

最近唄詠に登録されている声で読み上げようとすると、読み上げが行われず、ハングアップするようになりました。 一旦UtaYomiを起動→終了してからだと、正常に読み上げが行われます。 この現象は、SofTalkからに限らず、ExcelのVBAから読み上げを実行した場合も同様です。

唄詠は7.62、OSはWin10 64bit、Excelは2013です。

Sub aaa() 'SAPI を使って音声読み上げ Dim voic As Object Dim strRET As String Dim colVIC As Collection

Set colVIC = New Collection
Set voic = CreateObject("SAPI.SpVoice")
For i = 0 To voic.GetVoices.Count - 1
    colVIC.Add i, voic.GetVoices().Item(i).GetDescription()
Next

Set voic.Voice = voic.GetVoices().Item(colVIC("唄詠:鳴瀧ナギ"))

'strRET = UTA(voic)
voic.Volume = 100
voic.Rate = Int(15 / 15 - 10)

Call voic.Speak(Range("A1"))
Set voic = Nothing

End Sub

[対応状況]調査中 [報告経路]コンタクト

shinta0806 commented 6 years ago

(追加情報) 唄詠の音源登録情報画面にて視聴を行ってから、SofTalk で読み上げを行うと、読み上げが行える場合があります。