Discussion :

[Agalis]

Bonjour,

J'ai une fonction qui prends 3 arguments de type String. Je chercher à évaluer si ces arguments sont vides ou non. J'ai utilisé ceci où

Code :

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

1
2
3
4
5
rtg1=""
rtg2=AA
rtg2=BB
 
nbr_de_rtg = WorksheetFunction.CountA(rtg1, rtg2, rtg3)

Si j'utilise NBVAL directement dans la feuille le résultat est bien 2 alors qu'avec COUNTA, le résultat est 3. Auriez-vous une indication pour éviter ce problème?

Merci d'avance

[Igloobel]

salut,

si tu utilises : WorksheetFunction.CountA ds l'aide en ligne ils disent que les textes vides sont compté mais pas les cellules vides (je connais pas la différence, ou alors j'ai mal lu)

tu peux utiliser : WorksheetFunction.Count si tes arguments sont des chiffres (equivalence de =NB)

efin tu as également WorksheetFunction.CountBlank qui compteque les vides (equivalence de =NB.vide)

voilà j'espère qui cela suffira

@ +

[Agalis]

Merci mais j'avais déjà lu la doc

si tu utilises : WorksheetFunction.CountA ds l'aide en ligne ils disent que les textes vides sont compté mais pas les cellules vides (je connais pas la différence, ou alors j'ai mal lu)

Merci mais j'avais déjà lu la doc et c'est effectivement un comportement normal de la fonction mais je cherche un moyen de résoudre ce problème

tu peux utiliser : WorksheetFunction.Count si tes arguments sont des chiffres (equivalence de =NB)

C'est du texte et non des chiffres comme je le mettais dans mon post:

efin tu as également WorksheetFunction.CountBlank qui compteque les vides (equivalence de =NB.vide)

J'ai essayé aussi mais cette fonction fonctionne avec un range de cellules. Or je fonctionne ici avec 3 variables (3 arguments qui servent à ma fonction).

Merci néanmoins pour ces pistes

[Igloobel]

bonsoir,
Pour que je t'aide plus il me faut plus d'info.
Tu dis

Or je fonctionne ici avec 3 variables (3 arguments qui servent à ma fonction).

c'est quoi tes variables? des cellules nommées ? des variables dans du code VBA ?
Et puis c'est quoi le but du jeu ? c'est quoi cette fonction mystérieuse ?

à bientôt

[Agalis]

Bonjour,

Il s'agit des variables dans le code VBA. Il s'agit simplement d'une fonction qui doit prendre la 2ème valeure la plus élevée de 3 variables numérique (chaque champs texte est initialement transformer en poids numérique au début de ma fonction).

Mais mon problème est d'abord de compter combien de variables ne sont pas vides.

Merci

[Igloobel]

Bonjour,

voici un petit bout de code qui test tes variables (je l'ai ai mis dans un tableau je trouve cela plus simple)

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Public nbr_de_rtg, i As Byte
Public Rtg(1 To 3) As String
 
Sub test_Rtg()
    Rtg(1) = ""
    Rtg(2) = "AA"
    Rtg(3) = "BB"
    For i = 1 To 3
        If Rtg(i) <> "" Then
            nbr_de_rtg = nbr_de_rtg + 1
        End If
    Next i
    MsgBox "Il y a " & nbr_de_rtg & " rtg valide sur 3"
End Sub

Tu dis si cela te conviens

@ bientôt

[Agalis]

Génial, ça fonctionne. Grand merci