Verification par macro

Bonjour,
j ai un fichier avec une macro pour ajouter les données saisies en feuille 1 dans un tableau recap en feuille 2
ce que je souhaiterais c'est pouvoir mettre dans la macro un msgbox qui m'indiquerait si la date de saisie est déjà présente dans mon tableau recap
mes compétences en vba étant très limités pourriez vous m'aider svp?

Bonjour,

rappel :

http://www.developpez.net/forums/images/misc/sticky.gif Important : Editorial - A lire avant de poster

Citation:

---

Envoyé par bullot27

qui m'indiquerait si la date de saisie est déjà présente dans mon tableau recap

---

Je n'ai pas ouvert ton XLSM pour des questions de prudence.
Est-ce que ce que tu veux savoir c'est si la cellule dans laquelle est placée cette date est vide ou non ?
Dans ce cas, il suffit de mettre un test du type :

Code:

---

If Range("A1").Value = "" Then

---

En remplaçant A1 par la cellule où se trouve la valeur à tester.

bonsoir menhir,

en fait ce que je voudrais c'est savoir si la date contenue dans la cellule a1 de l'onglet 1 est déjà présente dans la colonne B de l'onglet 2 et si oui stopper la macro

Si tu ne donnes pas suffisamment de renseignements pour comprendre ton problème sans avoir à ouvrir ton fichier, je ne peux pas t'aider.

Comme ici c'est le forum des formules de calculs d'Excel, voir du côté des fonctions EQUIV, RECHERCHEV, CHERCHE, TROUVE, …

Bonjour à tous,
tu peux utiliser la fonction NB.SI.
En VBA soon pendant est Application.WorksheetFunction.CountIf.
Un exemple :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Sub Test() Dim Rng As Range, LaDate As Range, DerLig As Long Set LaDate = Sheets("Feuil1").Range("B3") DerLig = Sheets("Feuil2").Range("C" & Rows.Count).End(xlUp).Row Set Rng = Sheets("Feuil2").Range("C3:C" & DerLig) If Application.WorksheetFunction.CountIf(Rng, LaDate) > 0 Then MsgBox "date déjà présente": End Else 'ton code si la date n'est pas présente End If End Sub

---

A+

bonsoir menhir,

en fait dans mon 1er onglet j'ai un tableau où je rentre des données( plus précisément un nombre d'opération par position de travail).dans la cellule A1 je mets la date des données concernées.j'ai enregistré une macro qui copie et colle ces données sur un 2eme onglet puis les classe par date. ce que je souhaiterais c'est pouvoir insérer un message d'alerte dans la macro si la date en a1 est déjà présente dans mon 2eme onglet autrement dit si j'ai déjà rentré des données à cette date

bonsoir davido 84,

merci pour ta réponse c'est exactement ce que je voulais, je ne connaissais pas l'équivalent en vba de nb.si

je vais tester je te dirai

merci encore