Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Formule EXCEL RECHERCHE

Formule EXCEL RECHERCHE

4 réponses
Avatar
Serg B
Bonjour =E0 tous jai une grande pr=E9occupation la suivante :

je souhaite avoir une formule pour r=E9soudre le probl=E8me suivant:

""Trouver le contenu d'une cellule X1 dans la plage de cellule x:y et attri=
buer le contenu de la cellule X2""

Merci Beaucoup!!!!
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jacquouille
Bonjour
Cela va déjà faire une boucle .... tu cherches la valeur de X1 dans les
colonnes X et Y ......
Ensuite, tu veux copier x2 ......

Si, dans les colonnes x et y, tu veux remplacer le contenu de X1 par celui
de x2, dis-le.
Les boules de cristal chaufferont moins. -))

Peut-être ceci:

Sub testmpfe()
For Each c In Range("x3:y10")
If [c] = [x1] Then [x2] = c
Next
End Sub


Jacquouille

" Le vin est au repas ce que le parfum est à la femme."
"Serg B" a écrit dans le message de groupe de discussion :


Bonjour à tous jai une grande préoccupation la suivante :

je souhaite avoir une formule pour résoudre le problème suivant:

""Trouver le contenu d'une cellule X1 dans la plage de cellule x:y et
attribuer le contenu de la cellule X2""

Merci Beaucoup!!!!


---
Ce courrier électronique ne contient aucun virus ou logiciel malveillant parce que la protection avast! Antivirus est active.
http://www.avast.com
Avatar
Serg B
Le lundi 5 mai 2014 13:08:21 UTC+1, Jacquouille a écrit :
Bonjour

Cela va d�j� faire une boucle .... tu cherches la valeur de X1 dans les

colonnes X et Y ......

Ensuite, tu veux copier x2 ......



Si, dans les colonnes x et y, tu veux remplacer le contenu de X1 par celu i

de x2, dis-le.

Les boules de cristal chaufferont moins. -))



Peut-�tre ceci:



Sub testmpfe()

For Each c In Range("x3:y10")

If [c] = [x1] Then [x2] = c

Next

End Sub





Jacquouille



" Le vin est au repas ce que le parfum est � la femme."

"Serg B" a �crit dans le message de groupe de discussion :





Bonjour � tous jai une grande pr�occupation la suivante :



je souhaite avoir une formule pour r�soudre le probl�me s uivant:



""Trouver le contenu d'une cellule X1 dans la plage de cellule x:y et

attribuer le contenu de la cellule X2""



Merci Beaucoup!!!!





---

Ce courrier �lectronique ne contient aucun virus ou logiciel malv eillant parce que la protection avast! Antivirus est active.

http://www.avast.com


Merci Jacquouille

En fait les Variable X1 et X2 sont des cellules quelconques et XY la plage quelconque dans laquelle je vais chercher une donné

Merci
Avatar
MichD
Bonjour,

Une formule peut extraire une valeur d'une plage de cellules, mais elle ne
peut pas recopier ce contenu dans une autre cellule qu'elle-même!

Tu peux faire ce que tu désires avec une macro. Adapte les variables
selon la donne de ton application.

Ceci n'est qu'un exemple :
'-----------------------------------------
Sub test()
Dim X1 As Variant, Trouve As Range
X1 = 10 'La valeur cherchée
With Worksheets("Feuil1") 'Nom feuille à adapter
With .Range("A1:G25") 'Plage où se fait la recherche
'Recherche si la valeur cherchée existe dans la plage
Set Trouve = .Find(what:=X1, LookIn:=xlValues, lookat:=xlWhole)
End With
If Not Trouve Is Nothing Then
'on a trouvé
Application.EnableEvents = False
'affecte le contenu de la cellule trouvé à H10
.Range("H10") = Trouve.Value
Application.EnableEvents = False
End If
End With
End Sub
'-----------------------------------------



"Serg B" a écrit dans le message de groupe de discussion :


Bonjour à tous jai une grande préoccupation la suivante :

je souhaite avoir une formule pour résoudre le problème suivant:

""Trouver le contenu d'une cellule X1 dans la plage de cellule x:y et
attribuer le contenu de la cellule X2""

Merci Beaucoup!!!!
Avatar
Serg B
Le lundi 5 mai 2014 14:58:36 UTC+1, MichD a écrit :
Bonjour,



Une formule peut extraire une valeur d'une plage de cellules, mais elle n e

peut pas recopier ce contenu dans une autre cellule qu'elle-m�me!



Tu peux faire ce que tu d�sires avec une macro. Adapte les variab les

selon la donne de ton application.



Ceci n'est qu'un exemple :

'-----------------------------------------

Sub test()

Dim X1 As Variant, Trouve As Range

X1 = 10 'La valeur cherch�e

With Worksheets("Feuil1") 'Nom feuille � adapter

With .Range("A1:G25") 'Plage o� se fait la recherche

'Recherche si la valeur cherch�e existe dans la plage

Set Trouve = .Find(what:=X1, LookIn:=xlValues, lookat:=xl Whole)

End With

If Not Trouve Is Nothing Then

'on a trouv�

Application.EnableEvents = False

'affecte le contenu de la cellule trouv� � H10

.Range("H10") = Trouve.Value

Application.EnableEvents = False

End If

End With

End Sub

'-----------------------------------------







"Serg B" a �crit dans le message de groupe de discussion :





Bonjour � tous jai une grande pr�occupation la suivante :



je souhaite avoir une formule pour r�soudre le probl�me s uivant:



""Trouver le contenu d'une cellule X1 dans la plage de cellule x:y et

attribuer le contenu de la cellule X2""



Merci Beaucoup!!!!



Merci Mich D j'essai tout de suite