IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

extraire les colonnes vers une autre feuille si date supérieure à une autre


Sujet :

Macros et VBA Excel

  1. #1
    Membre à l'essai
    Homme Profil pro
    Inscrit en
    Novembre 2011
    Messages
    24
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Novembre 2011
    Messages : 24
    Points : 10
    Points
    10
    Par défaut extraire les colonnes vers une autre feuille si date supérieure à une autre
    Bonjour les amis je galère encore ... J'aimerai copier les colonnes vers une autre feuille si la date comprise dans la colonne F est supérieure à la date comprise dans la colonne G je suis aussi assez curieux par rapport au contrôle calendar 8.0 des contrôles supplémentaires du formulaire. Puis je extraire vers une autre feuille les colonnes en fonction d'une date sur laquelle j'aurai cliquer

  2. #2
    Expert éminent sénior
    Homme Profil pro
    aucune
    Inscrit en
    Septembre 2011
    Messages
    8 203
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : Septembre 2011
    Messages : 8 203
    Points : 14 354
    Points
    14 354
    Par défaut
    Bonjour,

    Avec un commandbutton et un contrôle Calendrier posés sur une feuille, mets les macros suivantes dans le module de la feuille :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    Private Sub Calendar1_Click()
        MsgBox Me.Calendar1.Value
        Me.Calendar1.Visible = False
        Me.Calendar1.Enabled = False
    End Sub
     
    Private Sub CommandButton1_Click()
        Me.Calendar1.Visible = True
        Me.Calendar1.Enabled = True
    End Sub
    Il reste à remplacer le "msgbox" par ce que tu veux faire de la date.
    Cordialement.

    Daniel

    La plus perdue de toutes les journées est celle où l'on n'a pas ri. Chamfort

  3. #3
    Membre à l'essai
    Homme Profil pro
    Inscrit en
    Novembre 2011
    Messages
    24
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Novembre 2011
    Messages : 24
    Points : 10
    Points
    10
    Par défaut
    Merci j'ai essayé mais il me dit erreur de compilation utilisation incorrecte de la propriété value de calendar1

  4. #4
    Expert éminent sénior
    Homme Profil pro
    aucune
    Inscrit en
    Septembre 2011
    Messages
    8 203
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Paris (Île de France)

    Informations professionnelles :
    Activité : aucune

    Informations forums :
    Inscription : Septembre 2011
    Messages : 8 203
    Points : 14 354
    Points
    14 354
    Par défaut
    Ton contrôle s'appelle bien Calendar1 ? Il y a toujours eu une propriété Value liée à ce contrôle. Quelle est ta version d'Office, précisément ? Quand tu fais un clic droit sur le contrôle (en mode création) et que tu cliques sur "Propriétés", tu obtiens leur liste; est-ce que tu trouves "Value" ?
    Cordialement.

    Daniel

    La plus perdue de toutes les journées est celle où l'on n'a pas ri. Chamfort

Discussions similaires

  1. Réponses: 0
    Dernier message: 18/03/2013, 12h05
  2. Réponses: 10
    Dernier message: 20/06/2012, 14h39
  3. Réponses: 7
    Dernier message: 29/11/2010, 21h52
  4. Réponses: 2
    Dernier message: 11/04/2009, 11h04
  5. [VBA-E] Trier les colonnes sur toute la feuille
    Par tro2blabla dans le forum Macros et VBA Excel
    Réponses: 11
    Dernier message: 30/05/2006, 11h49

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo