Bonjour,
J’utilise un code pour mon fichier que je souhaiterai adapter
problème je ne connais quasiment rien à VBA
En gros le code que j’utilise pour mon fichier exige le remplissage de tous les critères pour fonctionner
Serait-il possible d’utiliser une partie des critères (en tout cas pas tous) ?
Merci d’avance pour votre aide
voici le bout de code (il s’agit du code concernant le bouton de recherche) concernant le problème à régler:
Private Sub cmd_recherche_Click()
Dim compteur As Integer
Dim cpt As Integer
Dim montab()
If Me.cmb_service = « » Or Me.cmb_datemvt = « » Then
MsgBox « Veuillez renseigner tous les différents critères de recherche »
Exit Sub
End If
compteur = 0
For i = 1 To counter
If Me.cmb_service = tablo(i, 5) And CDate(Me.cmb_datemvt) = CDate(tablo(i, 7)) Then
compteur = compteur + 1
End If
Next i
If compteur = 0 Then
Me.ListBox1.Clear
Exit Sub
End If
ReDim montab(compteur, 11)
cpt = 0
For i = 1 To counter
If Me.cmb_service = tablo(i, 5) And CDate(Me.cmb_datemvt) = CDate(tablo(i, 7)) Then
cpt = cpt + 1
For colonne = 1 To 11
montab(cpt, colonne) = tablo(i, colonne)
Next colonne
Par exemple oui
Mais as que
Ce que je voudrais c’est avoir sur le même userform plusieurs possibilités de critère sans être obligé de les utiliser dans une même recherche.
Re,
Regarde un peu les deux macros sur le bouton de recherche (la tienne et la mienne)
tu verras comment sont différentiés les deux recherches
après pour tous les textbox et/ou combobox, ce n’est pas le TOP
mais à savoir si toutes les données doivent être filtrées de cette façon ??
