× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Bureautique
 Filtrage via VBA avec parametre Variable (Date du jour en cours) RESOLUSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
sgh.chafaa
  Posté le 22/01/2018 @ 19:57 
Aller en bas de la page 

Je cherche de faire le trie automatisé de la date avec un Macro VBA, le critère est que la date à choisir doit être la date en cour du système

donc c'est un paramètre de date variable.

mon code actuel pour une date fixe (10/31/2017) est comme suit:

Sub filtedate1()

ActiveSheet.Range("$C$6:$AI$1283").AutoFilter Field:=4, Criteria1:=Array("="), Operator:=xlFilterValues, Criteria2:=Array(2, "10/31/2017")

End Sub

J'ai chercher de changer la date "10/31/2017" par les paramètres suivants :

Date

Aujourd'hui

AUJOURDHUI()

LDate

"Date"

"Aujourd'hui()"

"LDate"

Aussi j'ai essayé d'attribuer la resultat de la fonction AUJOURDHUI() à une cellule E1 que j'ai nommé (datedaujourdhui) puis je l'ai mis parmis les variable de syntexe : Criteria2:=Array(2,datedaujourdhui)

Mais toujours erreur de Debogage, y a -t-il une solution s'il vous plait ?



Modifié par sgh.chafaa le 22/01/2018 20:25
Publicité
sgh.chafaa
 Posté le 22/01/2018 à 20:24 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page

Merci Pour Monsieur Jea-ERIC

CODE : TOUT SÉLECTIONNER

Sub filtedate1()
    ActiveSheet.Range("$C$6:$AI$1283").AutoFilter _
            Field:=4, _
            Criteria1:=xlFilterToday, _
            Operator:=xlFilterDynamic
End Sub
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
299,99 €Ecran 27 pouces Acer Nitro XV272UP (QHD, IPS, 144 Hz) à 299,99 €
Valable jusqu'au 30 Novembre

Fnac fait une promotion sur l'écran 27 pouces Acer Nitro XV272UP (QHD 2560x1440, IPS, 144 Hz) à 299,99 € au lieu de 399 €. L'écran est Adaptive Sync et compatible Freesync et GSync.


> Voir l'offre
79,95 €Clavier Gaming Logitech G513 Carbon Lightsync RVB à 79,95 €
Valable jusqu'au 25 Décembre

Materiel.net fait une promotion sur le clavier Gaming Logitech G513 Carbon Lightsync RVB qui passe à 79,95 € au lieu de 129 € ailleurs. Mélange parfait de performances, de technologies et d'une conception d'une qualité inégalée, le clavier G513 est un clavier gaming mécanique RVB équipé des switches mécaniques tactiles avancés Romer-G plébiscités par les professionnels d'eSports du monde entier. La coque en alliage aluminium robuste et légère apporte une rigidité et une apparence haut de gamme tout en lui conférant une forme fine semblable à une lame. Et pour davantage de confort, le Logitech G513 dispose d'un repose-poignets en mousse à mémoire de forme. Le Logitech G513 est doté d'un rétro-éclairage RVB complet d'environ 16.8 millions de couleurs avec un éclairage des touches personnalisable. De plus, grâce à la nouvelle technologie Lightsync, l'éclairage suit le rythme des jeux pour offrir l'expérience RVB la plus immersive qui soit.


> Voir l'offre
3,19 €Jeu PC Among Us à 3,19 €
Valable jusqu'au 30 Novembre

Steam fait une promotion sur le jeu dont tout le monde parle : Among Us qui passe à 3,19 € sur PC. Jouez de 4 à 10 personnes en ligne ou en local. Préparez votre vaisseau au départ mais attention, un ou plusieurs joueurs sont des imposteurs et feront tout pour tuer tout le monde. Notez que s'il n'offre pas le même confort de jeu en mobilité, il est gratuit sous iOS et Android.


> Voir l'offre

Sujets relatifs
Excel : Comment jouer avec la date du jour
colorier cellule avec la date du jour
Date du jour avec Excel
problème Date avec macro
sommeprod avec date
Macro...Date de Mise a jour
Word insérer date du jour dans nom du fichier
Money 2005 accéder à la mise à jour automatique des cours
Erreur date avec macro/ incapable d'ouvrir ailleurs que chez moi
échelle des x avec deux colonnes date et heure
Plus de sujets relatifs à Filtrage via VBA avec parametre Variable (Date du jour en cours) RESOLU
 > Tous les forums > Forum Bureautique