Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1032to1036
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Wert einer Zelle als Sprache vorlesen lassen ?

Wert einer Zelle als Sprache vorlesen lassen ?
20.12.2008 10:46:00
Melanie
Hallo allerseits,
kann man sich irgendwie den Zahlenwert einer Zelle als Sprache (Sound) vorlesen lassen ?
Also wenn in A1 der Wert 10 steht (ganzzahlig wuerde schon reichen), soll als sound der entsprechende Wert '10' gesagt werden (natuerlich will ich nicht fuer jeden Zahlenwert ein eigenes Soundfile vorhalten).
Oder gibt es externe Programme, die man per Excel dazu bringen kann, Zahlen (oder super-optimal sogar Text) vorzulesen ? Zur Not wuerde buchstabieren auch reichen.
Irgendwelche Ratschlaege ?
Gruss
Melanie

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wert einer Zelle als Sprache vorlesen lassen ?
20.12.2008 11:04:50
ransi
HAllo Melanie
Packe diesen Code mal in ein Modul:
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Public Function erzähl_mir_was(strText)
Dim sabbeln As Object
Set sabbeln = CreateObject("SAPI.SpVoice")
sabbeln.Speak strText
Set sabbeln = Nothing
End Function

Der aufruf geht dann so:
Tabelle1

 AB
112340

Formeln der Tabelle
ZelleFormel
B1=erzähl_mir_was(A1)


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4
Ist aber leider in Englisch.
ransi
Anzeige
AW: Wert einer Zelle als Sprache vorlesen lassen ?
20.12.2008 11:12:00
ransi
HAllo
Buchstabieren geht dann so:
' **********************************************************************
' Modul: Modul1 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit


Public Function erzähl_mir_was(strText)
Dim sabbeln As Object
Dim L As Long
Set sabbeln = CreateObject("SAPI.SpVoice")
For L = 1 To Len(strText)
    sabbeln.Speak Mid(strText, L, 1)
Next
Set sabbeln = Nothing
End Function

ransi
Anzeige
AW: Wert einer Zelle als Sprache vorlesen lassen ?
20.12.2008 17:42:00
Melanie
Hallo,
ist ja echt klasse !!!
Kann man vielleicht die Geschwindigkeit des Sprechens erhoehen oder irgendwie kontrollieren ?
Aber erstmal vielen DANK !!
Gruss
Melanie
AW: Wert einer Zelle als Sprache vorlesen lassen ?
20.12.2008 18:43:11
robert
hi,
unter systemsteuerung-sounds-sprache
gruß
robert
AW: Wert einer Zelle als Sprache vorlesen lassen ?
20.12.2008 19:43:45
Melanie
Hallo,
super! Danke an alle und froehliche Weihnachten !
Gruss
Melanie

332 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige