Fonction split

AxelV65 Messages postés 12 Date d'inscription   Statut Membre Dernière intervention   -  
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour,

Je viens de découvrir la fonction SPLIT...

Afin de créer des filtres par le biais de VBA
J'ai créer un programme terminant par :


If Cells(8, 9).Value <> FAUX Then
A = "MANO"
Filtre = True
End If

If Cells(9, 9).Value <> FAUX Then
B = "RD"
Filtre = True
End If

Sheets("CR").Select
If Filtre = True Then
Critere = Split(A & "," & B, ",")
ActiveSheet.Range("$A$1:$C$4222").AutoFilter Field:=3, Criteria1:=Critere, Operator:=xlFilterValues

Le programme fonctionne, mais je voudrais juste rallonger la liste des critères.
J'aimerais rajouter des lettres de (A jusqu'à H) dans ma fonction SPLIT, j'ai beau tout essayer mais rien ne marche, quelqu'un pourrait m'aider ?

Merci d'avance :)
A voir également:

2 réponses

Réponse 1 / 2
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Bonjour,

Le programme fonctionne,
Faut voir.

Pige pas ce que vous voulez:
rajouter des lettres de (A jusqu'à H) dans ma fonction SPLIT,
0
Réponse 2 / 2
AxelV65 Messages postés 12 Date d'inscription   Statut Membre Dernière intervention  
 
Je n'ai pas mis l'intégralité du programme, juste la fin…

Je voudrais pouvoir écrire ceci : Critere = Split(A & "," & B, "," & C, ","& D, ","& E, ","& F, ","& G, ","& H, ","). Mais lorsque je l'écrit de cette manière cela ne fonctionne pas...
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

cela ne fonctionne pas...
Tout a fait Thierry, Split n'a qu'un seul critere de separation

Normalement, sauf erreur de ma part, vous ne pouvez utiliser votre Variable Critere en tant que tel vu que par defaut c'est un tableau pas une valeur unique
0

Discussions similaires

Traduction français vers créole guadeloupéen
Anonyme -
Raymond PENTIER -

1 réponse