Fonction Bipper

[Vieupot]

Bonjour
J'ai lu dans un ouvrage EXCEL 2007 qu'il existait la possibilité de faire retentir des bips en fonction d'une condition.
Après recherche sur Google je n'ai pas trouvé de fonction Bipper.

Sur mon livre il est proposé avec la fonction SI =Si(B3>3000;bipper(3);" ")

Une suite de chiffres se trouvent de B4 à B12, le total en B3 et la formule en B2
Il est précisé sur ce livre que si ça ne Bip pas sur le livre la fonction émets des bips sur un tableau !
J'ai essayé...ça ne fonctionne pas j'ai à la place de la formule #Noms
Connaissez vous cette formule, et si oui pourquoi ça ne fonctionne pas
Merci par avance
Cordialement

 

[phlaurent55]

Bonjour Vieupot,

Faire retentir des bips est possible mais en passant par VB avec l'instruction Beep

à+
Philippe

 

[phlaurent55]

Re,



voir fichier joint

à+
Philippe

 

[M12]

Bonjour
procédure à mettre dans un module

Function Bipper(Nombre)
Dim i As Long
    For i = 1 To 100000 * Nombre
        If i / 100000 = Int(i / 100000) Then Beep
    Next
    Bipper = ""
End Function

ex: =SI(B4>3000;bipper(1);"")

 

[Vieupot]

Bonjour Philippe
Merci de votre réponse qui fonctionne sur votre exemple
Pour moi c'est différent ! je ne connais pas le VBA mais m'y intéresse beaucoup ne serait-ce que pour faire travailler ma tête (69 ans). Aussi même si je vais vous paraitre incompétent je désire savoir et comprendre !
si je copie le code et que je modifie ça ne fonctionne pas et me dit:
Erreur de compilation, instruction incorrecte à l'intérieur d'une procédure
voila ce que j'ai fait: j'ai copié collé votre code.
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A3")) Is Nothing Then
If Target > 10 Then Beep
End If

End Sub

j'ai sur une feuille une cellule N4 qui ne doit jamais être égale à zéro
J'ai donc remplacé dans votre exemple A3 par "N4" et if Target >10 par If Target =0

Voila c'est tout simple mais pour un novice....
pourtant il m'arrive pour m'entrainer de modifier des macros enregistrées avec l'éditeur de macro et souvent ça marche
Merci de m'aider à comprendre
Bernard

 

[M12]

Re,

A tester

 

[Vieupot]

Bonjour à tous
Merci de vos réponses, ça fonctionne parfaitement
Super sympha d'aider le troisième âge !
trés bon forum
Bernard

 

[phlaurent55]

Bonjour à tous
Merci de vos réponses, ça fonctionne parfaitement
Super sympha d'aider le troisième âge !
trés bon forum
Bernard

Je fais également partie du 3ème âge

À+
Philippe