eviter la saisie de doublons par le formulaire Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Répondre
h
hyppogris
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 26 décembre 2014
Version d'Excel : 2007

Message par hyppogris » 18 janvier 2015, 00:26

Bonjour,
je n'arrive pas à programmer mon formulaire pour obtenir un message d'alerte en cas de saisie d'un doublon dans mon tableau d'ingrédients.
merci pour votre aide
prix revient patisseries.xlsm
(28.46 Kio) Téléchargé 67 fois
f
frangy
Passionné d'Excel
Passionné d'Excel
Messages : 4'337
Appréciation reçue : 1
Inscrit le : 19 novembre 2012
Version d'Excel : 2007 FR

Message par frangy » 18 janvier 2015, 01:29

Bonjour,

Une proposition
prix revient patisseries.xlsm
(28.82 Kio) Téléchargé 211 fois
A+
h
hyppogris
Jeune membre
Jeune membre
Messages : 38
Inscrit le : 26 décembre 2014
Version d'Excel : 2007

Message par hyppogris » 18 janvier 2015, 20:11

Bonsoir Frangy,

En plein dans le mille, ça marche nickel.
Je débute et j'essaie de bien comprendre pour ne pas appliquer les formules bêtement, sans être capable de les reproduire.
J'ai aussi utiliser le nom du tableau que j'avais insérer : tableau1
Peux tu me dire si je traduis bien ?

Et encore merci pour ton aide.

Private Sub CommandButton1_Click() 'Enregistrer

With Worksheets("PRIX INGREDIENTS")

If Application.CountIf([tableau1], Me.TextBox1.Text) = 0 Then 'si nombre de message textbox1 dans tableau1 =0,alors, Me reprend le nom du formulaire ??
.Rows("2:2").Insert Shift:=x1Down, CopyOrigin:=x1FormatfromLeftOrAbove 'insère une ligne
[A2] = TextBox1.Text 'inscrire textbox1
[B2] = TextBox2.Text 'inscrire textbox2
[C2] = TextBox3.Text 'inscrire textbox3
Else
MsgBox "Cet ingrédient est déjà inscrit dans la liste" 'sinon,inscrire "message"
End If
Unload UserForm1 'ferme le formulaire
End With
End Sub
f
frangy
Passionné d'Excel
Passionné d'Excel
Messages : 4'337
Appréciation reçue : 1
Inscrit le : 19 novembre 2012
Version d'Excel : 2007 FR

Message par frangy » 18 janvier 2015, 20:44

Bonsoir,
Peux tu me dire si je traduis bien ?
Oui, tout à fait.

Pour le formuler différemment :

Si l'ingrédient saisi dans le formulaire n'a pas été noté dans le tableau1, alors
on insère une nouvelle ligne avant la ligne 2,
puis on inscrit les 3 données du formulaire dans la feuille,
sinon,
on affiche un message


A+
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message