Discussion :

[bullrot]

Bonjour,

J'ai un tableau comme ceci :

data1 : 2
data2 : 3
data3 : 1
TOTAL : 6

J'avais créé une macro à l'époque qui me retrouvait la ligne Total

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Ligne = Application.Match("TOTAL", [B:B], 0)

Jusque la tout fonctionnait bien.

Hors ici j'ai du rajouter un 2ème tableau
Donc j'ai ceci :

data1 : 2
data2 : 3
data3 : 1
TOTAL : 6

data1 : 4
data2 : 4
data3 : 2
TOTAL : 10

J'aimerai retrouver la ligne TOTAL correspondante au 2ème tableau.

Des avis ?

[Marc-L]

Bonjour, bonjour !

Cette question n'est pas du Général VBA mais bien spécifique à une application d'Office ! (Access, Excel, …)
Donc plus de chance d'obtenir une réponse en postant dans le bon forum ‼

Sinon la première solution simple est de différencier le second texte en "TOTAL 2 :" par exemple …

[bullrot]

Merci pour la réponse,

Effectivement c'est l'option de facilité mais cela ne m'arrange pas.

Si un modo passe par ici il peut déplacer mon message ?

[Marc-L]

Sinon voir du côté de la méthode Find …

[eriiic]

Bonjour,

une possibilité :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
    With [B:B]
        Set total1 = .Find("TOTAL", LookIn:=xlValues, lookat:=xlWhole)
        Set total2 = .FindNext(total1)
    End With
    MsgBox total1.Address & vbLf & total2.Address

eric

[Marc-L]

S'il n'y a que deux cellules TOTAL dans la colonne, la méthode Range.Find trouve directement la dernière
grâce à son paramètre SearchDirection à xlPrevious comme aussi expliqué dans la FAQ ou un tutoriel …

Maintenant si c'est le montant dans la dernière saisie de la colonne, c'est simple
soit par la méthode Range.Find (comme dans la FAQ ou un tutoriel) soit via la propriété Range.End …