Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1614 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  VBA Excel, problème de filtre avec valeurs décimales

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

VBA Excel, problème de filtre avec valeurs décimales

n°1695923
daniel-12
Posté le 02-03-2008 à 21:12:04  profilanswer
 

bonjour
dans excel sous VBA
j'ai une colonne avec des nombres de 0 à 100 avec des virgules
En haut de la colonne j'ai mis un scrollbar me permetant de selectionner rapidement une valeur
En G7, j'ai le resultat du scrollbar (ex : 14,7)
 
Dans la foulée un filtre est exécuté sur la colonne G
Je voudrais que toutes les valeurs à +ou- 0.5 de la valeur de G7 reste affichées dans mon filtre
et ca ne marche pas
 
 

Code :
  1. Private Sub ScrollBar1_Change()
  2.     Range("G1" ).Select
  3.     dia1 = ">=" & ActiveCell.Value - 0.5
  4.     dia2 = "<=" & ActiveCell.Value + 0.5
  5.     Selection.AutoFilter Field:=7, Criteria1:=dia1, Operator:=xlAnd, Criteria2:=dia2
  6. End Sub

mood
Publicité
Posté le 02-03-2008 à 21:12:04  profilanswer
 

n°1695924
daniel-12
Posté le 02-03-2008 à 21:16:46  profilanswer
 

Indice  :wahoo:  
Le problème est du aux . ou ,  
mon fichier a comme séparateur des ,
mais j'ai un peu de mal a jongler avec tout ça

n°1696649
daniel-12
Posté le 03-03-2008 à 23:11:32  profilanswer
 

personne ?

n°1696712
otobox
Maison fondée en 2005
Posté le 04-03-2008 à 07:38:54  profilanswer
 

Remplacer les points par des virgules ? (menu Edition>Remplacer)... A automatiser avec une macro si ça marche.


---------------
OtObOxBlOg - - - Etre seul à avoir tort  c'est plus difficile, mais c'est bien plus beau que d'avoir raison avec une bande de cons
n°1701399
daniel-12
Posté le 12-03-2008 à 22:27:07  profilanswer
 

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 :
  1. Private Sub ScrollBar1_Change()
  2. Range("G1" ).Select
  3. dia1 = "=" & ActiveCell.Value
  4. Selection.AutoFilter Field:=7, Criteria1:=dia1
  5. End Sub


Message édité par daniel-12 le 12-03-2008 à 22:27:55

Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  VBA Excel, problème de filtre avec valeurs décimales

 

Sujets relatifs
camera ip problème d'affichageformulaire html et liste déroulante, problème avec l'option par défaut
Créer une fonction en VBAcréer un macro sur excel
[JAVA SWING] probleme avec la gestion des layout managerPetit problème avec encodage
problème encodage caractére avec htmlspecialchars()Problème mysql_connect()
Problème boucle de recherche sous VBA sur Excel 
Plus de sujets relatifs à : VBA Excel, problème de filtre avec valeurs décimales


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR