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

Microsoft 365 (Résolu) Recherche valeur et écrit "OK" même ligne 4 cases à droite

Créer une discussion

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
L

Le Rouky

XLDnaute Nouveau
Le forum,

Voilà, n'étant pas un foudre de guerre, je voudrai en VBA:

- Si la valeur du TextBox1 demande "Toto", faire une rechercher dans la colonne "A" de la feuille "Test",
- si la valeur est trouvé, mettre "OK" sur la même ligne quatre cases à droite.

exemple :



Cordialement
 
Dernière édition:
Solution
Bonjour Le Rouky, bonjour le forum,

je travaille rarement sur Excel avec des photos, j'utilise plutôt photochope pour ça...
Si tu as plusieurs Toto tu fais quoi ?

Sinon ça donne un code de ce style (non testé) :
VB: 
Dim CEL As Range

Set CEL = ActiveSheet.Columns(1).Find(Me.TextBox1.Value, , xlValues, xlWhole)
If Not CEL Is Nothing Then CEL.Offset(0, 4).Value = "OK"
Trier par date Trier par votes
Bonjour Le Rouky, bonjour le forum,

je travaille rarement sur Excel avec des photos, j'utilise plutôt photochope pour ça...
Si tu as plusieurs Toto tu fais quoi ?

Sinon ça donne un code de ce style (non testé) :
VB: 
Dim CEL As Range

Set CEL = ActiveSheet.Columns(1).Find(Me.TextBox1.Value, , xlValues, xlWhole)
If Not CEL Is Nothing Then CEL.Offset(0, 4).Value = "OK"
 
Vote positif 0 Vote négatif
Solution
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

EXCEL :: Cases à cocher - Connaître les détails d'un regroupement issu d'un GROUPER.PAR
Réponses
0
Affichages
386
oguruma
  • Résolu(e)
XL 2021 recherche supprimer les espaces '"si valeur cherchée est numérique" sinon NON
Réponses
7
Affichages
783
Usine à gaz
X
  • Résolu(e)
XL 2016 Souci pour mettre un nombre dans une cellule en croisant colonne et ligne.
2
Réponses
16
Affichages
1 K
Xender
X
J
  • Question Question
Autres Supprimer une ligne dans une feuille à partir d'une valeur rentrée dasn une cellule d'une autre feuille
2
Réponses
25
Affichages
2 K
jmc78
J
  • Résolu(e)
XL 2010 Dernière valeur en bas et valeur à droite même ligne
Réponses
7
Affichages
914
Orson83
I
  • Résolu(e)
Microsoft 365 VBA EXCEL Utilisation d'une variable avec données dans un tableau
Réponses
4
Affichages
998
mapomme
F
  • Question Question
XL 2019 Recherche en ligne dans matrice et ramener cellule de la même ligne
Réponses
12
Affichages
1 K
TooFatBoy
  • Résolu(e)
Autres InputBox
Réponses
8
Affichages
868
dysorthographie
L
  • Résolu(e)
Microsoft 365 ( Résolu ) TextBox2 rempli par rapport à TextBox1
Réponses
6
Affichages
668
Eric C
  • Résolu(e)
XL 2010 Recherche donnée <> nombre et sup la ligne si oui
Réponses
3
Affichages
965
jeanmi
E
  • Question Question
XL 2016 Cherche valeur d'une ligne et renvoi valeur correspondante d'une autre colonne
Réponses
1
Affichages
1 K
Chris401
  • Question Question
Microsoft 365 Recherche Find : impossible dans lignes masquées par le filtre
2 3
Réponses
38
Affichages
3 K
Usine à gaz
  • Question Question
XL 2010 Rech fichier contenant la valeur d'une cellule d'un tableau excel et copier/coller/sup
Réponses
6
Affichages
929
jeanmi
E
  • Question Question
XL 2016 Cherche valeur d'une ligne et renvoi valeur correspondante d'une autre ligne
Réponses
4
Affichages
2 K
elisa05000
E
  • Résolu(e)
XL 2010 Valeur à comparer avec 1 colonne pour afficher valeur de droite
Réponses
2
Affichages
808
Orson83
W
  • Question Question
XL 2010 recherche d'une valeur en fonction de colonnes dont les intitulés sont des plages de valeurs
Réponses
4
Affichages
2 K
WalloWG
W
J
  • Résolu(e)
XL 2016 Recopie d'un texte si valeur au croisement de colonne et ligne identique
Réponses
8
Affichages
1 K
Jonathan08
J
C
  • Question Question
XL 2013 Macro VBA appliquer une formule somme.si.ens à un tableau et ensuite une recherche mutli critere
Réponses
12
Affichages
2 K
Dranreb
D
  • Question Question
XL 2013 Recherche valeur fixe - Remplissage cellules
Réponses
9
Affichages
2 K
Dja75
D
D
  • Résolu(e)
Microsoft 365 Recherche dans un tableau, une matrice
Réponses
6
Affichages
1 K
dgui
D
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…