Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Je recherche à faire une recherche Vba mais je n'y parvient pas.
Par exemple dans la plage A1:M50
Je voudrais donc compter tous les mots présent sauf Toto, TicTac et Lulu.
Merci pour votre aide.
pas sûr que tu sois gagnant en consommation de ressource mais comme la plage est petite ça ne se sentira pas.
Un peu confus mais si j'ai bien compris, oui, c'est comme ça qu'il faut faire.
Ou bien tu peux tenter une union() de plages, ou tu nommes ta plage faite en 2 sélections et tu utilises le nom, mais pas sur que nb.si() aime ça.
eric
Merci pour cette réponse qui m'a bien aiguillé
Cela donne :
VB:
Sub Trouver()
Dim R1 As Integer
Dim R2 As Integer
Dim R3 As Integer
Dim R4 As Integer
Dim Rfinal As Integer
Dim Plage As Range
Set Plage = Range("A1:M50")
R1 = WorksheetFunction.CountA(Range("A1:M50"))
R2 = WorksheetFunction.CountIf(Range("A1:M50"), "Toto")
R3 = WorksheetFunction.CountIf(Range("A1:M50"), "TicTac")
R4 = WorksheetFunction.CountIf(Range("A1:M50"), "Lulu")
Rfinal = R1 - R2 - R3 - R4
MsgBox Rfinal
End Sub
Peux-t'on simplifier ?
Je complique ma demande si je veux faire ma recherche à compter non pas de A1 mais par exemple D1.
Suis-je obliger de faire un CountA de D1 à M1 et refaire un autre CountA de A2 à M50 et les additionner ?
Merci.
pas sûr que tu sois gagnant en consommation de ressource mais comme la plage est petite ça ne se sentira pas.
Un peu confus mais si j'ai bien compris, oui, c'est comme ça qu'il faut faire.
Ou bien tu peux tenter une union() de plages, ou tu nommes ta plage faite en 2 sélections et tu utilises le nom, mais pas sur que nb.si() aime ça.
eric
Ce site utilise des cookies pour personnaliser le contenu, adapter votre expérience et vous garder connecté si vous vous enregistrez.
En continuant à utiliser ce site, vous consentez à notre utilisation de cookies.