oui, c'est possible, mais fortement dépendant de la rapidité de ta machine. Ainsi, la boucle de 100000 que tu donnes est trop courte, et on n'a le temps d'entendre qu'un seul bip. Sur ma vieille bécane, en mettant à 300000, j'entends bien 3 bips avec cette fonction, mais dans quelques jours, quand j'aurai ma machine flambant neuve, je suppose qu'il faudra que j'augmente significativement la taille de cette boucle.
En bref, si ça doit tourner uniquement chez toi, alors pas de problème, après deux ou trois tâtonnements, ça devrait aller, mais ça reste un gadget...
Function Bipe(ByVal Nbre&)
Dim i&
For i = 1 To 300000 * Nbre
If i / 300000 = Int(i / 300000) Then Beep
Next i
End Function