filtre élaboré, enfin un peu

f69815

XLDnaute Occasionnel
bonsoir le forum,

petit pb dans un UF avec deux textbox, voici le code :

Sub filtre_num_oi()
MsgBox ' Vous avez choisi les OI entre ' & min_oi & ' et ' & max_oi
Sheets('histoi').Range('G1:G1').Select
Selection.AutoFilter
Selection.AutoFilter Field:=7, Criteria1:='==>' & min_oi, Operator:=xlAnd, _
Criteria2:='==>' & max_oi

End Sub


le msgbox retourne bien les valeurs rentrées dans l'UF, mais le résultat = 0, rien d'afficher, alors que je suis certain de ma fourchette.

ces variables sont déclarées public, string

cerise sur le gâteau, pour éviter les erreurs de frappe, comment en cliquant dans une cellule afficher sa valeur dans le textbox, sachant qu'il va falloir le faire deux fois pour le filtre.

la bonne nuit à tous ceux qui vont cogiter
 

Gael

XLDnaute Barbatruc
Bonjour,

En fait tout marche très bien avec la macro suivante:

Sub Macro1()
'
' Macro1 Macro
' Macro enregistrée le 30/06/2005 par GCHMDIR
'

'
min_oi = 'N00300226'
max_oi = 'N00300227'

Range('A10').Select
Selection.AutoFilter
Selection.AutoFilter Field:=1, Criteria1:='>=' & min_oi, Operator:=xlAnd _
, Criteria2:='<=' & max_oi

End Sub

Aucune différence entre les versions 2000 et 2003. Alors d'où venait le problème?

Tout simplement parceque dans ta liste il y a un espace à la fin de chaque code, c'est pourquoi le = ne marche pas.

Le premier code s'affiche car 'N00300226 ' est > 'N00300226'
le deuxième ne s'affiche pas car 'N00300227 ' est différent de 'N00300227'.

Je te t'envoie pas de soleil des Antilles car il pleut beaucoup en ce moment mais le coeur y est.

@+

Gael
 

Gael

XLDnaute Barbatruc
Bonjour Visiteur,

En fait, dans ce cas, je ne comprends pas ta remarque.

Comme il s'agit d'un mini maxi, il faut prendre tout ce qui est à la fois >mini ET <maxi.

Si je mets un OU, j'aurais aussi les valeurs >maxi et <mini.

@+

Gael
 

f69815

XLDnaute Occasionnel
bonsoir les antilles,

désolé pour le retard à te répondre mais j'avais un martiniquais à la maison.

tu as raison pour l'espace, je l'avais identifié, mais j'ai mis max ou min_oi left(variable,8).


j'ai compri mon erreur, j'ai modifié mon fichier origine pour supprimer les espaces et tout va très bien.


merci pour tout chez nous on veut un peu de pluie
 

Discussions similaires

Statistiques des forums

Discussions
312 276
Messages
2 086 714
Membres
103 377
dernier inscrit
fredy45