Bonjour.
Grâce à AV, j'ai cette proc qui fonctionne très bien.
Est-il possible qu elle compte le nombre de fois qu'il y a l'élément trouvé
?
Merci beaucoup
Vincent
Mavar = frm_spl.Label1.Caption
If IsNumeric(Application.Match(Mavar , [Master!A3:A500], 0)) Then _
MsgBox "Ce nom...apparaît X fois"
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
michdenis
Bonjour Vincent,
Essaie ceci :
mavar = frm_spl.Label1.Caption If IsNumeric(Application.Match(mavar, [Master!A3:A500], 0)) Then MsgBox "Ce nom apparaït: " & Application.CountIf _ ([Master!A3:A500], mavar) & " fois." _ , vbInformation + vbOKOnly, "Décompte de " & _ mavar & " dans : A3:A500" End If
Salutations!
"Vincent" a écrit dans le message de news: Bonjour. Grâce à AV, j'ai cette proc qui fonctionne très bien. Est-il possible qu elle compte le nombre de fois qu'il y a l'élément trouvé ? Merci beaucoup Vincent
Mavar = frm_spl.Label1.Caption If IsNumeric(Application.Match(Mavar , [Master!A3:A500], 0)) Then _ MsgBox "Ce nom...apparaît X fois"
Bonjour Vincent,
Essaie ceci :
mavar = frm_spl.Label1.Caption
If IsNumeric(Application.Match(mavar, [Master!A3:A500], 0)) Then
MsgBox "Ce nom apparaït: " & Application.CountIf _
([Master!A3:A500], mavar) & " fois." _
, vbInformation + vbOKOnly, "Décompte de " & _
mavar & " dans : A3:A500"
End If
Salutations!
"Vincent" <V.herlat@tiscali.fr> a écrit dans le message de news:ePVe6tTuEHA.3088@tk2msftngp13.phx.gbl...
Bonjour.
Grâce à AV, j'ai cette proc qui fonctionne très bien.
Est-il possible qu elle compte le nombre de fois qu'il y a l'élément trouvé
?
Merci beaucoup
Vincent
Mavar = frm_spl.Label1.Caption
If IsNumeric(Application.Match(Mavar , [Master!A3:A500], 0)) Then _
MsgBox "Ce nom...apparaît X fois"
mavar = frm_spl.Label1.Caption If IsNumeric(Application.Match(mavar, [Master!A3:A500], 0)) Then MsgBox "Ce nom apparaït: " & Application.CountIf _ ([Master!A3:A500], mavar) & " fois." _ , vbInformation + vbOKOnly, "Décompte de " & _ mavar & " dans : A3:A500" End If
Salutations!
"Vincent" a écrit dans le message de news: Bonjour. Grâce à AV, j'ai cette proc qui fonctionne très bien. Est-il possible qu elle compte le nombre de fois qu'il y a l'élément trouvé ? Merci beaucoup Vincent
Mavar = frm_spl.Label1.Caption If IsNumeric(Application.Match(Mavar , [Master!A3:A500], 0)) Then _ MsgBox "Ce nom...apparaît X fois"
Vincent
Merci beaucoup Denis, c'est exactement cela ! Bonne soirée Vincent
"michdenis" a écrit dans le message de news: uZUQv$
Bonjour Vincent,
Essaie ceci :
mavar = frm_spl.Label1.Caption If IsNumeric(Application.Match(mavar, [Master!A3:A500], 0)) Then MsgBox "Ce nom apparaït: " & Application.CountIf _ ([Master!A3:A500], mavar) & " fois." _ , vbInformation + vbOKOnly, "Décompte de " & _ mavar & " dans : A3:A500" End If
Salutations!
"Vincent" a écrit dans le message de news: Bonjour. Grâce à AV, j'ai cette proc qui fonctionne très bien. Est-il possible qu elle compte le nombre de fois qu'il y a l'élément trouvé ? Merci beaucoup Vincent
Mavar = frm_spl.Label1.Caption If IsNumeric(Application.Match(Mavar , [Master!A3:A500], 0)) Then _ MsgBox "Ce nom...apparaît X fois"
Merci beaucoup Denis, c'est exactement cela !
Bonne soirée
Vincent
"michdenis" <michdenis@hotmail.com> a écrit dans le message de news:
uZUQv$TuEHA.1452@TK2MSFTNGP11.phx.gbl...
Bonjour Vincent,
Essaie ceci :
mavar = frm_spl.Label1.Caption
If IsNumeric(Application.Match(mavar, [Master!A3:A500], 0)) Then
MsgBox "Ce nom apparaït: " & Application.CountIf _
([Master!A3:A500], mavar) & " fois." _
, vbInformation + vbOKOnly, "Décompte de " & _
mavar & " dans : A3:A500"
End If
Salutations!
"Vincent" <V.herlat@tiscali.fr> a écrit dans le message de
news:ePVe6tTuEHA.3088@tk2msftngp13.phx.gbl...
Bonjour.
Grâce à AV, j'ai cette proc qui fonctionne très bien.
Est-il possible qu elle compte le nombre de fois qu'il y a l'élément
trouvé
?
Merci beaucoup
Vincent
Mavar = frm_spl.Label1.Caption
If IsNumeric(Application.Match(Mavar , [Master!A3:A500], 0)) Then _
MsgBox "Ce nom...apparaît X fois"
Merci beaucoup Denis, c'est exactement cela ! Bonne soirée Vincent
"michdenis" a écrit dans le message de news: uZUQv$
Bonjour Vincent,
Essaie ceci :
mavar = frm_spl.Label1.Caption If IsNumeric(Application.Match(mavar, [Master!A3:A500], 0)) Then MsgBox "Ce nom apparaït: " & Application.CountIf _ ([Master!A3:A500], mavar) & " fois." _ , vbInformation + vbOKOnly, "Décompte de " & _ mavar & " dans : A3:A500" End If
Salutations!
"Vincent" a écrit dans le message de news: Bonjour. Grâce à AV, j'ai cette proc qui fonctionne très bien. Est-il possible qu elle compte le nombre de fois qu'il y a l'élément trouvé ? Merci beaucoup Vincent
Mavar = frm_spl.Label1.Caption If IsNumeric(Application.Match(Mavar , [Master!A3:A500], 0)) Then _ MsgBox "Ce nom...apparaît X fois"
