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

macro SI valeur cellule trouvée dans base de données ALORS ...

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion simpson25
  • 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'inscrire
S

simpson25

XLDnaute Nouveau
Bonjour à tous,
Je suis en train de réaliser un tableau excel qui créer une base de données à partir d'un formulaire (sans userforme)
En simplifier 3 informations sont demandées: numéro de fiche, Nom, Prénom.
Je souhaiterai que lorsque le numéro de fiche dans le formulaire est déjà présent dans la base de données, le nom et prénom sont remplacées dans la base de données (et donc éviter les doublons dans la BDD) sinon copier les données

En reformulant:
SI n° fiche formulaire <> n° fiche BDD ALORS créer nouvelle ligne
SI n° fiche formulaire = n° fiche BDD ALORS remplacer nom et prénom

J'ai commencé à explorer cette piste pour créer une ligne (où B3 est la cellule contenant n° fiche formulaire et J3:J25 base de données) mais cela ne marche pas :

Code: 
 If Not IsEmpty(Range("B3")) And InStr("B3", "J3:J25", -1) = False Then]

Merci d'avance
 
Trier par date Trier par votes
Re : macro SI valeur cellule trouvée dans base de données ALORS ...

Bonjour,

regarde peut être plutôt du coté de la méthode "Find", F1 dans l'éditeur vba te donnera plus d'info...

bon après midi
@+
 
Vote positif 0 Vote négatif
Re : macro SI valeur cellule trouvée dans base de données ALORS ...

Merci de votr réponse, j'ai cherché dans cett direction mais je bloque au niveau d'un terme de la formule. La synthaxe de FIND est la suivante : object.Find(target, startline, startcol, endline, endcol [, wholeword] [, matchcase] [, patternsearch])

Je ne comprend pas le terme "object" malgré ce qui est indiqué dans l'aide d'excel (j'ai juste quelques notions en VBA)
(Expression désignant un objet donné et pouvant inclure n'importe quel conteneur de l'objet. Par exemple, une application peut être dotée d'un objet Application contenant un objet Document contenant lui-même un objet Text.)
 
Vote positif 0 Vote négatif
Re : macro SI valeur cellule trouvée dans base de données ALORS ...

Bonjour,

l'objet en question peut être un objet "Range" dans lequel la recherche va être effectuée :
Code: 
Range("A1:A100").Find

ou bien sur une colonne :
Code: 
Columns(1).Find

ou sur toutes les cellules de la feuille active :
Code: 
Cells.Find

bonne journée
@+
 
Vote positif 0 Vote négatif
Re : macro SI valeur cellule trouvée dans base de données ALORS ...

Merci beaucoup j'ai enfin pu terminé cette macro.
Je mets le code si quelqu'un rencontre le même problème.

Code: 
Dim RechercheCellule As Range
Dim NumFiche As Integer
NumFiche = Range("B3").Value

Set RechercheCellule = Range("J3:J40").Find(NumFiche, LookIn:=xlValues)

If Not RechercheCellule Is Nothing Then
...

If RechercheCellule Is Nothing Then
...

Bonne journée
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- 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

Discussions similaires

  • Question Question
XL 2021 Base de données avec images
2
Réponses
21
Affichages
998
patricktoulon
  • Résolu(e)
Microsoft 365 Extraction d'informations sur différents onglets en partant d'une base de données
Réponses
7
Affichages
690
MBax
S
  • Question Question
XL 2013 Copier automatiquement des données dans plusieurs onglets
Réponses
4
Affichages
476
Phil69970
E
  • Résolu(e)
Microsoft 365 Ajouter dans TS en fonction valeur de cellule
Réponses
8
Affichages
462
vgendron
F
  • Question Question
Autres Récupération de données d'une feuille X en fonction de la valeur de cellule dans une collone d'une feuille Y
2
Réponses
27
Affichages
1 K
fanfan38
S
  • Résolu(e)
Microsoft 365 Mailing mise en forme HTML : revenir à la ligne automatique si trop de texte saisie
2
Réponses
17
Affichages
922
spike29
S
  • Résolu(e)
XL 2013 (RESOLU) Automatisation de la création de feuilles en fonction des données de la cellule U13 et une feuille type
Réponses
7
Affichages
640
chaelie2015
A
  • Question Question
Autres EXCEL 2024-Formule complexe - demande d'aide - solution
Réponses
1
Affichages
515
Dranreb
L
  • Question Question
Microsoft 365 Faire agir une macro en fonction de l'emplacement du bouton
Réponses
2
Affichages
585
AtTheOne
P
  • Résolu(e)
XL 2013 Creations de macro
Réponses
3
Affichages
583
PR.
P
P
  • Résolu(e)
XL 2021 Formule de Calcul Multiplication avec Si
Réponses
14
Affichages
1 K
Phoesius
P
E
  • Question Question
XL 2016 Modifier une base de données, sans user form, VBA
Réponses
5
Affichages
2 K
AtTheOne
B
  • Question Question
XL 2016 Macro pour identifier un texte dans un tableau et appliquer une modification sur une cellule sur la même ligne
Réponses
5
Affichages
607
ChTi160
G
  • Question Question
Microsoft 365 Saut de ligne dans une cellule
Réponses
3
Affichages
773
GClaire
G
  • Question Question
XL 2021 Intégration de données et userfom
Réponses
9
Affichages
926
100kibou
  • Résolu(e)
XL 2021 Intégrations de multi données dans une cellule
Réponses
4
Affichages
504
100kibou
C
  • Résolu(e)
Microsoft 365 Duplication à partir d'une base de données du contenu d'un onglet dans d'autres onglets
Réponses
2
Affichages
715
Céline49
C
N
  • Résolu(e)
XL 2019 VBA: Copier valeurs de cellules si critère "VRAI" présent
Réponses
5
Affichages
618
fanfan38
J
  • Résolu(e)
XL 2013 VBA - Si cellule contient du texte défini dans une autre cellule
Réponses
6
Affichages
1 K
JessK
J
S
  • Question Question
XL 2019 fichier prospection
Réponses
2
Affichages
1 K
saimone
S
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…