OVH Cloud OVH Cloud

Erreur de syntaxe... et nb d'occurences...

3 réponses
Avatar
Yvan
Bonjour,

Quelqu'un peut-il m'indiquer où se trouve l'erreur dans la syntaxe suivante :

If IsError(WorksheetFunction.VLookup(TextBox1.Value, Sheets("Fiche
Client").Range(Cells(i, 2), Cells(5 + a, 11)), 1, False)) = False Then...

De plus, quelle syntaxe me permet de connaitre le nombre d'occurences d'un
élément dans une colonne ???

--
Merci pour vos réponses.

3 réponses

Avatar
isabelle
bonjour Yvan,

si "nombre d'occurences" signifi nombre de valeur :
Application.CountIf(Range("A:A")

pour la première question, ou est le TextBox1, sur la feuille ou sur un userform ?

isabelle


Bonjour,

Quelqu'un peut-il m'indiquer où se trouve l'erreur dans la syntaxe suivante :

If IsError(WorksheetFunction.VLookup(TextBox1.Value, Sheets("Fiche
Client").Range(Cells(i, 2), Cells(5 + a, 11)), 1, False)) = False Then...

De plus, quelle syntaxe me permet de connaitre le nombre d'occurences d'un
élément dans une colonne ???



Avatar
Yvan
Le TextBox1 se trouve sur un Userform.

Concernant le nb d'occurence, je souhaite savoir combien de fois la valeur
"truc" apparait dans une liste...
--
Merci pour vos réponses.



bonjour Yvan,

si "nombre d'occurences" signifi nombre de valeur :
Application.CountIf(Range("A:A")

pour la première question, ou est le TextBox1, sur la feuille ou sur un userform ?

isabelle


Bonjour,

Quelqu'un peut-il m'indiquer où se trouve l'erreur dans la syntaxe suivante :

If IsError(WorksheetFunction.VLookup(TextBox1.Value, Sheets("Fiche
Client").Range(Cells(i, 2), Cells(5 + a, 11)), 1, False)) = False Then...

De plus, quelle syntaxe me permet de connaitre le nombre d'occurences d'un
élément dans une colonne ???






Avatar
isabelle
voilà,

x = Application.CountIf(Range("A:A"), "truc")
'ou bien avec "contenu dans"
x = Application.CountIf(Range("A:A"), "*truc*")

isabelle


Le TextBox1 se trouve sur un Userform.

Concernant le nb d'occurence, je souhaite savoir combien de fois la valeur
"truc" apparait dans une liste...