chercher et supprimer

[chaelie2015]

Bonjour forum

Je souhaite chercher une valeur dans le tableau de la feuille 1 via la feuille 2 cellule g3 et afficher les résultats de recherche dans la feuille2 et après supprimer la ligne qui correspond a ces valeurs dans le tableau de la feuille1

Salutation

 

[phlaurent55]

Bonjour Chaelie,

un début de réponse par formule en pièce jointe

à+
Philippe

 

[chaelie2015]

Bonjour PHLAURENT55
MERCI POUR LES FORMULES
et comment faire pour supprimer la ligne?
A+

 

[pierrejean]

Bonjour Charlie

Salut Philippe

Une 1ere solution

 

[chaelie2015]

Bonjour Charlie

Salut Philippe

Une 1ere solution

bonjour pierrejean
merci pour le code en vba (chercher); mais je souhaite supprimer la ligne dans le tableau de la feuille1
a+

 

[pierrejean]

Re

Une autre solution : la recherche se fait au changement de G3

 

[chaelie2015]

Re

Une autre solution : la recherche se fait au changement de G3

Re
encore merci pierrejean
mais comment faire pour supprimer la lignes (dans la feuille1) qui correspond a ces valeurs?
a+

 

[Lone-wolf]

Bonjour à tous 🙂

@ chaelie:

Range("G6") = c.Offset(, 1)
Range("G8") = c.Offset(, 2)
Range("G10") = c.Offset(, 3)
Range("G12") = c.Offset(, 4)
c.Offset(0, 0).EntireRow.Delete

EDIT : ou une autre proposition

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$G$3" Then
With Sheets("Feuil1")
rw = Application.Match(Target.Value, .Columns(2), 0)
Range("G6") = .Cells(rw, 3)
Range("G8") = .Cells(rw, 4)
Range("G10") = .Cells(rw, 5)
Range("G12") = .Cells(rw, 6)
.Rows(rw).EntireRow.Delete
End With
End If
End Sub

 

[pierrejean]

Re

Avec effacement

 

[chaelie2015]

Bonjour tout le monde
merci pour les réponses c'est super
Problème résolut
Salutations