Bonjour, je suis nouveau sur Internet et j'aimerai une aide sur Office XP Pro
2002
et plus particulierement sur EXCEL; En effet, j'essaye en vain d'installer
les sons OFFICE sur Excel mais je n'y arrive pas. Je selectionne " Outils et
ensuite les Options puis l'onglet Géneral et enfin les avertissements
sonores. Quand je valide Ok, j'ai un message m'indiquant que pour installer
les sons Office, je dois me connecter sur Office sur le web, et ensuite je
suis perdu. Pourriez-vous m'aider.
Par avance, merçi.
Stéphane b.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichDenis
Bonjour Stéphane,
Si tu fais référence au fait qu'excel "peut parler" ...
Voici 2 messages parus ici et qu'il peuvent t'aider :
Je n'ai pas le nom de l'auteur de ces lignes ... '------------------------------- En fait, il faut d'abord installer Microsoft Reader ici : http://www.microsoft.com/reader/fr/downloads/pc.asp Puis le pack que tu signales en français et enfin dans le panneau de configuration/Voix/synthese vocale et choisir Pierre ou Sophie.
Je crois qu'il existe un "pack" pour avoir la langue en français !
'------------------------------------------------- Sub ReadCells() On Error Resume Next Dim TTS As Object Set TTS = CreateObject("Speech.VoiceText") If TTS Is Nothing Then Status "Erreur Speech.VoiceText création !": Exit Sub TTS.Register "", " ": Err.Clear: TTS.Enabled = True If Err.Number = 0 Then Dim Cell As Range, Msg As String For Each Cell In ActiveSheet.UsedRange If Len(Cell.Text) > 0 Then Msg = Msg & Cell.Text & " " Next Cell If Len(Msg) = 0 Then Msg = "Aucune cellule ne contient de texte" TTS.Speak Msg, 16 While TTS.IsSpeaking: DoEvents: Wend Else Status "Erreur Speech.VoiceText automation !" End If Set TTS = Nothing End Sub
Sub Status(strMessage) MsgBox strMessage, 64 End Sub
Si tu as une erreur de création de l'objet, essaie avec Set TTS = CreateObject("Speech.VoiceText.1") Pour activer la barre d'outils Texte en parole, je pense qu'il te faut: Démarrer / Panneau de configuration / Ajout/Suppression de programmes Modifier Office XP en ajoutant le ou les composants nécessaires. MP '-------------------------------------------------
Salutations!
"Stéphane.b" a écrit dans le message de news:
Bonjour, je suis nouveau sur Internet et j'aimerai une aide sur Office XP Pro 2002 et plus particulierement sur EXCEL; En effet, j'essaye en vain d'installer les sons OFFICE sur Excel mais je n'y arrive pas. Je selectionne " Outils et ensuite les Options puis l'onglet Géneral et enfin les avertissements sonores. Quand je valide Ok, j'ai un message m'indiquant que pour installer les sons Office, je dois me connecter sur Office sur le web, et ensuite je suis perdu. Pourriez-vous m'aider. Par avance, merçi. Stéphane b.
Bonjour Stéphane,
Si tu fais référence au fait qu'excel "peut parler" ...
Voici 2 messages parus ici et qu'il peuvent t'aider :
Je n'ai pas le nom de l'auteur de ces lignes ...
'-------------------------------
En fait, il faut d'abord installer Microsoft Reader ici :
http://www.microsoft.com/reader/fr/downloads/pc.asp
Puis le pack que tu signales en français et enfin dans le panneau de configuration/Voix/synthese
vocale et choisir Pierre ou Sophie.
Je crois qu'il existe un "pack" pour avoir la langue en français !
'-------------------------------------------------
Sub ReadCells()
On Error Resume Next
Dim TTS As Object
Set TTS = CreateObject("Speech.VoiceText")
If TTS Is Nothing Then Status "Erreur Speech.VoiceText création !": Exit
Sub
TTS.Register "", " ": Err.Clear: TTS.Enabled = True
If Err.Number = 0 Then
Dim Cell As Range, Msg As String
For Each Cell In ActiveSheet.UsedRange
If Len(Cell.Text) > 0 Then Msg = Msg & Cell.Text & " "
Next Cell
If Len(Msg) = 0 Then Msg = "Aucune cellule ne contient de texte"
TTS.Speak Msg, 16
While TTS.IsSpeaking: DoEvents: Wend
Else
Status "Erreur Speech.VoiceText automation !"
End If
Set TTS = Nothing
End Sub
Sub Status(strMessage)
MsgBox strMessage, 64
End Sub
Si tu as une erreur de création de l'objet, essaie avec Set TTS = CreateObject("Speech.VoiceText.1")
Pour activer la barre d'outils Texte en parole, je pense qu'il te faut:
Démarrer / Panneau de configuration / Ajout/Suppression de programmes
Modifier Office XP en ajoutant le ou les composants nécessaires.
MP
'-------------------------------------------------
Salutations!
"Stéphane.b" <Stphaneb@discussions.microsoft.com> a écrit dans le message de news:
BCE76F02-87F1-4E63-98AC-C208C048EFD1@microsoft.com...
Bonjour, je suis nouveau sur Internet et j'aimerai une aide sur Office XP Pro
2002
et plus particulierement sur EXCEL; En effet, j'essaye en vain d'installer
les sons OFFICE sur Excel mais je n'y arrive pas. Je selectionne " Outils et
ensuite les Options puis l'onglet Géneral et enfin les avertissements
sonores. Quand je valide Ok, j'ai un message m'indiquant que pour installer
les sons Office, je dois me connecter sur Office sur le web, et ensuite je
suis perdu. Pourriez-vous m'aider.
Par avance, merçi.
Stéphane b.
Si tu fais référence au fait qu'excel "peut parler" ...
Voici 2 messages parus ici et qu'il peuvent t'aider :
Je n'ai pas le nom de l'auteur de ces lignes ... '------------------------------- En fait, il faut d'abord installer Microsoft Reader ici : http://www.microsoft.com/reader/fr/downloads/pc.asp Puis le pack que tu signales en français et enfin dans le panneau de configuration/Voix/synthese vocale et choisir Pierre ou Sophie.
Je crois qu'il existe un "pack" pour avoir la langue en français !
'------------------------------------------------- Sub ReadCells() On Error Resume Next Dim TTS As Object Set TTS = CreateObject("Speech.VoiceText") If TTS Is Nothing Then Status "Erreur Speech.VoiceText création !": Exit Sub TTS.Register "", " ": Err.Clear: TTS.Enabled = True If Err.Number = 0 Then Dim Cell As Range, Msg As String For Each Cell In ActiveSheet.UsedRange If Len(Cell.Text) > 0 Then Msg = Msg & Cell.Text & " " Next Cell If Len(Msg) = 0 Then Msg = "Aucune cellule ne contient de texte" TTS.Speak Msg, 16 While TTS.IsSpeaking: DoEvents: Wend Else Status "Erreur Speech.VoiceText automation !" End If Set TTS = Nothing End Sub
Sub Status(strMessage) MsgBox strMessage, 64 End Sub
Si tu as une erreur de création de l'objet, essaie avec Set TTS = CreateObject("Speech.VoiceText.1") Pour activer la barre d'outils Texte en parole, je pense qu'il te faut: Démarrer / Panneau de configuration / Ajout/Suppression de programmes Modifier Office XP en ajoutant le ou les composants nécessaires. MP '-------------------------------------------------
Salutations!
"Stéphane.b" a écrit dans le message de news:
Bonjour, je suis nouveau sur Internet et j'aimerai une aide sur Office XP Pro 2002 et plus particulierement sur EXCEL; En effet, j'essaye en vain d'installer les sons OFFICE sur Excel mais je n'y arrive pas. Je selectionne " Outils et ensuite les Options puis l'onglet Géneral et enfin les avertissements sonores. Quand je valide Ok, j'ai un message m'indiquant que pour installer les sons Office, je dois me connecter sur Office sur le web, et ensuite je suis perdu. Pourriez-vous m'aider. Par avance, merçi. Stéphane b.