ich habe ein kleines problem. ich möchte am ende des makos einen beep erzeugen, wenn eine bedingung erfüllt ist. leider klappt dies jedoch nicht mit meiner makroversion.
ich habe nachfolgend die wesentlichen makroinhalte gepostet. das makro an sich läuft auch tadellos und Range("N1").value ist auch grösser null.
hat jemand ne idee , wie ich den beep hinbekomme?
vielen dank im vorraus
olaf
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
... '
Calculate
...
Sheets("Ergebnisse").Select
Range ("A5").Select
Application.ScreenUpdating = True
Application.Calculation = xlAutomatic
Application.EnableEvents = True
If Sheets("Formeln").Range("N1").Value > 0 Then Beep
End Sub