Bonjour,
J'ai déjà travaillé avec plusieurs langages de programmation (php, perl, ksh, java...) et vous avoue que j'ai du mal avec le Vba et son VBE.
Mon onglet contient un tableau de données source. J'aimerai d'abord filtrer ses informations avant de les traiter.
La partie Filtrage doit s'exécuter comme le filtre standard d'une colonne (combobox avec les données unique à cocher ou à décocher) mais via un bouton avec les champs + cases a cocher dans l'userform.
J'ai pensé à une organisation comme ci-desssous.
1. Module Onglet contient control du bouton +méthode de récupération d'infos
2. Module UserForm contient methode de génération de case a cocher avec un tableau de string en paramètre

Je fais appel à vous parce que je n'arrive pas à transmettre mes valeurs dans mes variables.

Voici un apperçu de mon code :

Module DataIn
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
Private Sub BoutonLancementPretrait_Click()
    Call LancementPretraitement
End Sub
 
 
Private Sub LancementPretraitement()
 
Dim DataIn As Worksheet
Set DataIn = ThisWorkbook.Worksheets("DataIn")
Dim TabString() As String
 
Dim i As Long	
TabString = Extractions.Range("R12", Range("A12").End(xlDown)).RemoveDuplicates  'erreur de type !!!
 
For i = 0 To UBound(TabString)
      AffichageCaseCochee(TabString(i))
Next i
End Sub
Module UserForm
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Public Sub AffichageCaseCochee (Libelle As String)
???
End Sub