prob date pour filtre auto

[zoulou08]

bonjour,
je veux faire un filtre auto suivant des dates

j'ai créé un usf où sont demandé le mois et l'année voulus pour l'exploitation des données (variables mo et an)

je voudrais que ces variable soient prises en compte pour mon filtre

j'ai essaye avec une date telle que 01-01-2005 et le filtre ne m'affiche aucune cellule alors qu'il y en a normalement (le filtre garde toutes les date inférieures à janvier 2005)

autre question

-faut il que je convertisse mes dates pour faciliter le programme (car il se peut qu'il n'y ai pas tous les jours une entrée)

-quelle est la technique pour supprimer les lignes vides après un filtre

merci d'avance

voici mon code :

Option Explicit 'oblige à déclarer toutes les variables

Private Sub UserForm_Initialize() 'à l'initialisation de l'UserForm
'Ajoute les mois dans la combobox1
mois.AddItem 'janvier'
mois.AddItem 'février'
mois.AddItem 'mars'
mois.AddItem 'avril'
mois.AddItem 'mai'
mois.AddItem 'juin'
mois.AddItem 'juillet'
mois.AddItem 'août'
mois.AddItem 'septembre'
mois.AddItem 'octobre'
mois.AddItem 'novembre'
mois.AddItem 'décembre'
mois.ListIndex = 0 'affiche 'janvier'
annee.Value = ''
End Sub

Private Sub CommandButton1_Click() 'bouton 'Ok'
Dim an As Integer 'déclare la variable an
Dim mo As String 'déclare la variable da
an = annee.Value 'définit la variable an
mo = mois.Value & '/' & an 'définit la variable da
'place la date au format mmmm/aaaa dans C1 (à adapter)
With Range('C1')
.Value = DateValue(mo)
.NumberFormat = 'mmmm/yyyy'
End With

Unload Me 'vide et ferme l'UserForm1

Sheets('données').Select 'ok
Rows('1:1').Select 'ok
Selection.AutoFilter 'ok
Selection.AutoFilter Field:=2, Criteria1:='>01/01/2005', Operator:=xlAnd
'Rows('5:16').Select
'Selection.Delete Shift:=xlUp

End Sub

 

[lapix]

an et mo peuvent etre simplement des string

apres tu les concatenes pour executer ta condition

si tu place dans c1 '12/12/2004' xl le prendra automatiquement en date

apres c'est une question d'affichage

 

[zoulou08]

merci
et comment faire pour le filtre si je veux etudier les donnees de mars et si il n y a pas le 01, 30 et 31 mars par exemple

mon programme doit etre modifie mais comment?
par une boucle j imagine...mais