Aide pour doc de compte

  • Initiateur de la discussion Initiateur de la discussion shuriken001
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S

shuriken001

Guest
Bonjour tout le monde
Je voudrai faire un petit tableau de gestion de compte, mais déjà je rencontre quelle que problèmes !
Je vous mais mon exemple et j’espère qu’une âme charitable pourras aider un cancre comme moi !😛
 
Dernière modification par un modérateur:
Re : Aide pour doc de compte

Bonjour

essaie avec ce code, dans le code de la feuille
(clic droit sur le nom de l'onglet, Visualiser le code)

Code:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column > 4 And Target.Column < 9 And Target.Row > 10 Then
    Application.EnableEvents = False
    Range(Cells(Target.Row, 5), Cells(Target.Row, 8)).ClearContents
    Target = "X"
End If
If Target.Column = 15 And Target.Row > 10 Then
    If IsError(Application.Match(Target, [designation], 0)) Then
        With Sheets("Feuil1")
            .[A65000].End(xlUp)(2).Value = Target
        End With
    End If
End If
Application.EnableEvents = True
End Sub

Nota, dans la liste de validation, dans le troisième onglet ("Alerte d'erreur"), décoche "Quand des données non valides sont tapées"

J'ai également modifiée la zone nommée Designation, qui te sert pour la validation des données.
Regarde dans Formule/Gestionnaire de noms

le fichier :
 

Pièces jointes

Re : Aide pour doc de compte

merci c'est exactement ceux que je voulais mais peu tu m'expliquer la marche à suivre car je voudrai le reproduire sur d'autre champ!
Et encore merci pour ton aide
 

Pièces jointes

Dernière modification par un modérateur:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

Réponses
1
Affichages
218
  • Question Question
Microsoft 365 affichage userform
Réponses
4
Affichages
523
Retour