Macro Vba - saisie de date Fermé

Question

Bonsoir,

Je souhaiterai à l'aide d'une macro demander à l'utilisateur d'un fichier excel de saisir une date (mise en variable au format jj/mm/aaaa) dans une fenêtre du type Input box.
Puis Excel fais un tri de tableau en fonction de cette date variable.

Merci d'avance pour votre aide



Configuration: Windows XP / Internet Explorer 7.0

Migou76 · Answer

Bonsoir,

Ca fait tout de même beaucoup de questions !

Je pense qu'un des problèmes se situe dans la mise en forme date dans vba :
Range("A1") = DateSerial(Year(TextBox1), Month(TextBox1), Day(TextBox1))

Bon....? Adieu !

MisterVba · Answer

Je me suis mal exprimé:

La procédure que souhaite faire suivre à l'utilisateur est :

1. je clique sur un bouton (=> sur lequel j'ai affecté une macro)
2.Excel affiche une boite de dialogue, qui demande à l'utilisateur de saisir une date au format jj/mm/aaaa
3.la macro fait un filtre dans une feuille en fonction de la date saisie (prend toutes les dates après celle saisie par l'utilisateur, c'est à dire supérieur)

Merci d'avance pour votre aid

Migou76 · Answer

Re,

Bien ce que je disais, "beaucoup de questions !" Y a-il un endroit particulier où tu n'arrives pas ou bien est-ce la total que tu demandes ?

MisterVBA · Answer

Voici mon code ou il ya un bug lorsqu'il filtre :

Sub Macro()
    Dim Datemin As String
    '********
    Datemin = InputBox("Date de début (au format jj/mm/aaaa: ", "Filtre date", Date)
    
    Selection.AutoFilter Field:=10, Criteria1:>Datemin, Operator:=xlAnd
      
End Sub


Merci pour votre aide

Macro Vba - saisie de date

4 réponses

Discussions similaires