XL 2021 Activer une cellule en fonctions de deux critères

Matt87 · 3 Juin 2023

Bonjour à toute la communauté,

Je cherche tant bien que mal à activer une cellule en fonctions de deux critères.

J'ai parcouru plusieurs forums pour tenter de trouver chaussure à mon pied.

J'ai tenté d'adapter certaines options comme le VlookUp et Index/Match, mais sans succès.

J'aimerais utiliser VBA pour activer la cellule dans la colonne " C " en utilisant les critères contenus dans les cellules E2 et F2.

Merci à l'avance de l'attention portée à ma demande.

Cordialement,

job75 · 4 Juin 2023

Bonjour Matt87, le forum,

Matt87 à dit:
Est-ce que c'est quelque chose de faisable ?

Evidemment :

VB:

Sub Recheche()
Dim i As Variant
With [Test] 'tableau structuré
    .Columns(1).Name = "Colonne1" 'plage nommée
    .Columns(2).Name = "Colonne2" 'plage nommée
End With
i = [MATCH(E2&F2,Colonne1&Colonne2,0)]
If IsNumeric(i) Then
    [Colonne1].Cells(i, 3).Select 'cellule en 3ème colonne
    MsgBox "Trouvé ligne " & i + [Colonne1].Row - 1
Else
    MsgBox "Pas trouvé"
End If
End Sub

A+

job75 · 3 Juin 2023

Bonjour Matt87,

Le plus simple est d'utiliser une Mise en forme conditionnelle (MFC).

A+

Matt87 · 4 Juin 2023

Merci Job75, mais l'idée derrière la manipulation serait d'éventuellement pouvoir modifier le contenu de cette cellule.

Est-ce que c'est quelque chose de faisable ?

job75 · 4 Juin 2023

Bonjour Matt87, le forum,

Matt87 à dit:
Est-ce que c'est quelque chose de faisable ?

Evidemment :

VB:

Sub Recheche()
Dim i As Variant
With [Test] 'tableau structuré
    .Columns(1).Name = "Colonne1" 'plage nommée
    .Columns(2).Name = "Colonne2" 'plage nommée
End With
i = [MATCH(E2&F2,Colonne1&Colonne2,0)]
If IsNumeric(i) Then
    [Colonne1].Cells(i, 3).Select 'cellule en 3ème colonne
    MsgBox "Trouvé ligne " & i + [Colonne1].Row - 1
Else
    MsgBox "Pas trouvé"
End If
End Sub

A+

Matt87 · 4 Juin 2023

Bonjour à tous,

Merci Job75, c'est en plein ce dont j'ai besoin.

Je crois que je n'étais pas si loin du résultat, mais je ne passais pas par une plage nommée.

Encore une fois merci, c'est vraiment apprécié

XL 2021 Activer une cellule en fonctions de deux critères

Matt87

XLDnaute Nouveau

Pièces jointes

job75

job75

XLDnaute Barbatruc

Pièces jointes

Matt87

XLDnaute Nouveau

job75

XLDnaute Barbatruc

Pièces jointes

Matt87

XLDnaute Nouveau

Discussions similaires