Bonjour,
En effet, comme le dit si bien Robert, les Ti_Fans peuvent faire péter n'importe quoi, aussi essaye donc cette procédure à placer dans le module de la feuille; à chaque fois qu'une formule se sentira chatouillée elle forcera l'utilisateur à passer dans une autre cellule:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.HasFormula = True Then
Target.Offset(, 1).Select
End If
End Sub
Maintenant, une simple phrase peut résoudre le problème aussi, du style,
'une modification des formules peut générér un bouleversement dans le résultat attendu!!!'
'une simple modif peut provoquer une vague d'incohérences incontrôlables'
'attention les mecs, si vous touchez à mes formules, vos données seront perdues'
' hé les boys!!! arrêtez de déconner avec les formules'
et un peu plus sophistiqué, avec une voix off, (genre voix de velours!!)
'messieurs, si vous continuez à tripoter mes formules, votre mémoire va s'affaiblir, lentement votre pc va passer en veille et vous perdrez tout contrôle, la destruction de toutes vos données va bientôt commencer........
10
9
8
7
6
5
4
3
2
1
0
vous venez de tout perdre, il ne vous reste plus qu'à vous connecter sur...............................................................................................................
X L D!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
B) Celeda B)
