afficher des informations contenues dans une feuille en cohant un Checkbox Userf

Question

Bonjour le forum,

j'aimerai savoir si quelqu'un aurait un code d'activation d'une Checkbox Userform? En effet, en cochant la Checkbox j'aimerai avoir un retour des informations contenues dans une feuille excel et qui respecte mon critere de sélection (la Checkbox cochée).

Voici mon code et qui ne fonctionne pas:


Private Sub CheckBoxpsa_Click()
CheckBoxpsa.Active
End Sub

Sub Recherchersite()
Dim F
Dim Feuille As Byte
Dim C As Range
Dim firstAddress As String
    F = Array("Application")
    Range("B2:P").End(xlDown).Row.ClearContents
    For Feuille = 0 To UBound(F)
        With Worksheets(F(Feuille))
            Set C = Find(Range(CheckBoxpsa.Value), , xlValues, xlWhole)
            If Not C Is Nothing Then
                firstAddress = C.Address
                Do
                    C.Resize(, 5).Copy Range("A" & Rows.Count).End(xlUp).Offset(1, 0)
                    Set C = .Columns(1).FindNext(C)
                Loop While Not C Is Nothing And C.Address <> firstAddress
            End If
        End With
    Next Feuille
End Sub

End Sub


Merci à tous.

Dany

ucfoutu · Answer

Bonjour,
que veux selon toi dire :
Private Sub CheckBoxpsa_Click()
  CheckBoxpsa.Active '====>>> gné ?????
End Sub

Où as-tu trouvé ce membre "Active" ? tu l'as inventé ?
Et qu'est-ce qui lance ta procédure Recherchersite ? ===>> rien !
et je passe sur ce que je lis dans ladite procédure (et des meilleures) !
Tu écris au hasard ?
Tu ferais mieux de tout reprendre depuis le début, à commencer par l'apprentissage de notions fondamentales.
Désolé, mais je ne peux ni ne veux t'aider avec de telles carences (énormes) 

________________________
Réponse exacte ? => "REPONSE ACCEPTEE" facilitera les recherches.
Pas d'aide en ligne installée ? => ne comptez pas sur moi pour simplement répéter son contenu. Je n'interviendrai que si nécessité de la compléter.

danytall · Answer

Merci

Afficher des informations contenues dans une feuille en cohant un Checkbox Userf

2 réponses

Votre réponse

Discussions similaires