Limiter une saisie dans une cellule à un %

Résolu/Fermé
CHARLYJACK Messages postés 353 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 16 mai 2023 - 4 avril 2018 à 17:27
CHARLYJACK Messages postés 353 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 16 mai 2023 - 4 avril 2018 à 20:45
Bonjour

Je dois renseigner une cellule dans un onglet avec un pourcentage,
mais je souhaite limiter la saisie à 15% maximum.

Je souhaite intégrer cette limite dans un code vba


Auriez vous une solution à me proposer ?

Par avance merci

1 réponse

yg_be Messages postés 22773 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 9 mai 2024 1 481
4 avril 2018 à 18:52
bonjour, suggestion:
Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("d23")) Is Nothing Then
     If Target > 0.15 Then
        Target = 0.15
    End If
End If
End Sub
0
CHARLYJACK Messages postés 353 Date d'inscription mardi 19 octobre 2010 Statut Membre Dernière intervention 16 mai 2023 1
4 avril 2018 à 20:45
Super c'est parfait
un grand merci
0