Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Aide sur Macro

reinruof77

XLDnaute Occasionnel
Bonjour le forum

je viens vers vous car j'ai un probleme avec une macro qui me permet de verifier si un identifiant a deja été saisi dans la feuille 2017 et pilotage.
j'ai cette macro
Code:
Dim ws As Worksheet
Dim rng As Range
Dim x As Double
    Set ws = ActiveWorkbook.Worksheets("2017")
    Set rng = ws.Range("AD:AD")
    x = WorksheetFunction.CountIf(rng, TextBox20.Value)
  
       If TextBox20 <> "" Then x = WorksheetFunction.CountIf(rng, TextBox20.Value) Else x = 0
        MsgBox "Ce nom a déjà été saisi  EN 2017 " & x & " fois.", 64, "Attention !..."

mais
1) cela vérifie que sur la feuille 2017.
2) j'ai un message même si l'identifiant n'as jamais été saisie
je joint mon fichier test.

Merci de votre aide.

PS: j'ai demander aussi sur le site :https://forum.excel-pratique.com/viewtopic.php?f=2&t=109025
 

Pièces jointes

  • pilotage test2018.xlsm
    161.2 KB · Affichages: 21

Discussions similaires

Réponses
1
Affichages
170
Réponses
2
Affichages
266
Réponses
0
Affichages
155
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…