ho !!
désolé pour le retard
en effet j'ai testé, ca marche, mais je voudrais ne pas trop toucher au séparateur décimaux (qui sont des virgules sur tout mes fichiers)
Je me suis apercu que la macro fonctionnait, mais que le filtre n'était pas appliqué
quand je vais manuellement dans mon filtre, je vois que les valeurs on bien été inséré, mais ca na pas fonctionné
SAUF,
si je met un filtre avec une valeur seulement
et que cette valeur est sans virgule
Code :
- Private Sub ScrollBar1_Change()
- Range("G1" ).Select
- dia1 = "=" & ActiveCell.Value
- Selection.AutoFilter Field:=7, Criteria1:=dia1
- End Sub
|
Message édité par daniel-12 le 12-03-2008 à 22:27:55