Filtrage de données par vba

Résolu
nouhaaa1995 Messages postés 79 Statut Membre -  
yg_be Messages postés 24281 Date d'inscription   Statut Contributeur Dernière intervention   -
bonjour,
je sollicite votre aide,
J'ai un tableau à filtrer et j'aurais aimé savoir si avec VBA il était possible de faire un tri (donc avec criteria:="") mais par rapport à la valeur d'entrée (combobox) sur mon userform.
merci d'avance

1 réponse

Réponse 1 / 1
yg_be Messages postés 24281 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 585
 
bonsoir, s'il s'agit d'Excel, je te suggère d'enregistrer une macro pendant que tu fais manuellement les actions que tu veux automatiser. tu pourras ensuite t'inspirer du code de cette macro pour adapter le code de ton userform.
0
nouhaaa1995 Messages postés 79 Statut Membre
 
j'ai essayé mais ca marche pas, car je veux qu'a partir de la valeur combobox, le filtrage s'affectue
0
nouhaaa1995 Messages postés 79 Statut Membre
 
voila le code, mais il me lance un erreur '' Erreur d'execution '9' : L'indice n'appartient pas à la sélection " 

Private Sub CommandButton1_Click()
With ActiveWorkbook
.Sheets("capitalier").Activate

ActiveSheet.Cells.AutoFilter Field:=8, Criteria1:="combobox2.Value", Operator:=xlAnd

End With
End Sub
0
yg_be Messages postés 24281 Date d'inscription   Statut Contributeur Dernière intervention   1 585 > nouhaaa1995 Messages postés 79 Statut Membre
 
sur quelle ligne as-tu l'erreur?
0
yg_be Messages postés 24281 Date d'inscription   Statut Contributeur Dernière intervention   1 585 > nouhaaa1995 Messages postés 79 Statut Membre
 
au lieu de: 
With ActiveWorkbook
.Sheets("capitalier").Activate

ActiveSheet.Cells.AutoFilter Field:=8, Criteria1:="combobox2.Value", Operator:=xlAnd

il est préférable de faire ainsi: 
dim sh as worksheet
set sh=ThisWorkbook.Sheets("capitalier")
sh.Cells.AutoFilter Field:=8, Criteria1:=combobox2.Value, Operator:=xlAnd
0
nouhaaa1995 Messages postés 79 Statut Membre
 
j'ai erreur au niveau 
 .sheets("capitaliser").Activate
0

Discussions similaires

Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
Erreur la zone de données passée à un appel système est insu
Vincent -
Panth33ra -

5 réponses
Barre de données en pourcentage (maintenir 100% comme max)
Jessica -
Jessica -

2 réponses
je tombe sur le service de diffusion des donnees?que faire?
cockies -
PeterPan972 -

5 réponses
TNT base de donnees vide!!
Angye25 -
Angye25 -

4 réponses