Microsoft Office Forum [ www.Office-Fragen.de ] >> READONLY <<

Microsoft Office 2003-2019 => Excel => Thema gestartet von: kealfra am August 02, 2015, 17:42:36 Nachmittag

Titel: Signalton
Beitrag von: kealfra am August 02, 2015, 17:42:36 Nachmittag
Hallo,
Gibt es bei einem VBA-Makro in Excel aus Office 2007 eine Möglichkeit, ein bestimmtes Ereignis (z. B. das Erreichen einer bestimmten Zahl in einer For-Next-Schleife) durch einen Signalton kundzutun? Und bitte nicht (wie manche Leute ihre Intelligenz -oder ihren Humor?-dokumentieren müssen) einfach nur mit "JA" antworten, sondern angeben, wie man das programmiert. Ein einfaches "Beep" nimmt der Makro nämlich nicht zur Kenntnis.

Bis dann, keakfra
Titel: Antw: Signalton
Beitrag von: maninweb am August 03, 2015, 09:08:49 Vormittag
Hallo,

das Beep müsste eigentlich funktionieren.

Code: Visual Basic
  1. Sub test()
  2.  
  3.   Dim n As Long
  4.  
  5.   For n = 1 To 10000000
  6.    
  7.     Select Case n
  8.    
  9.       Case 5000000
  10.        
  11.         Beep
  12.      
  13.       Case Else
  14.    
  15.     End Select
  16.    
  17.   Next
  18.  
  19. End Sub
Gruß
Titel: Antw: Signalton
Beitrag von: SekkiChrissi am August 03, 2015, 16:34:23 Nachmittag
Das hat bei mir geklappt! Vielen Dank! :)
Titel: Office 2007: Antw: Signalton
Beitrag von: kealfra am August 06, 2015, 11:11:29 Vormittag
Mallo maninweb,
Bei mir klappt das leider nicht. Es kommt kein Tönchen. Es wird zwar kein Fehler gemeldet, aber beim Durchgang im Einzelschrittverfahren wird das "Beep" ignoriert. Es wird einfach übersprungen.

Liegt es an meiner Uralt-Exel-Version? Das Verfahren mit "Select Case" ist mir nämlich auch noch nie untergekommen. Wenn ich den sog. Objektkatalog nach Beep durchsuche, taucht es in der Klasse "Interaction" auf. Was das bedeutet ist mir schleierhaft. Ich bin allerdings auch kein Profi in Sachen Makroprogrammierung.

mfg kealfra



Titel: Antw: Signalton
Beitrag von: maninweb am August 06, 2015, 13:01:21 Nachmittag
Hallo,

ist durchaus möglich, dass bei Deinem Rechner der Systemlautsprecher (der, der piepst, wenn man den Rechner anmacht)
nicht ansprechbar ist (Excel ruft m.W. eine Betriebssystemfunktion auf). Wenn also Beep in einer einfachen Sub nicht geht,
muss das nicht an Excel liegen. Was für ein Excel hast Du denn?

Gruß
Titel: Office 2007: Antw: Signalton
Beitrag von: kealfra am August 12, 2015, 11:55:32 Vormittag
Hallo, Maninweb,

Allem Anschein nach hast Du recht. Bei mir piept es nicht. Wenn ich die angeschlossenen Lautsprecher wegschalte und den PC neu starte, ist Ruhe im Schiff. :'( Es liegt also offensichtlich an meinem PC und nicht an meinem Excel 2007. Ich werde mal nachschauen, ob der Piepser im PC überhaupt angeschlossen ist.

mfg kealfra
Titel: Antw: Signalton
Beitrag von: gmg-cc am August 12, 2015, 14:15:03 Nachmittag
Moin,

vielleicht hilft dir ja der Ansatz aus diesem Link (http://www.herber.de/forum/archiv/544to548/546439_Sounddatei_abspielen_ueber_VBA.html).