Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel VBA sélectionner le mois en cours (1° et dernier jour en fait)

VBA sélectionner le mois en cours (1° et dernier jour en fait)

4 réponses
Avatar
pierre66
je cherche à sélectionner sur le mois entier dans des listes

j'essaye avec une base de données en mettant comme critère
ActiveCell.FormulaR1C1 = _
"=""<""FIN.MOIS(AUJOURDHUI();0))"
puis dans un autre )
"="">""FIN.MOIS(AUJOURDHUI();-1)+1)"
pour avoir <dernier_jour_du_mois ET >premier_jour_du_mois

marche pas ...

si quelqu'un a une macro sur l'année, avec une sélection du mois, je prends !

--
bien cordialement

pierre,
perpignan
Signaler un problème avec ce contenu

4 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Daniel
Bonjour.
Tu ne peux pas mettre des formules en français avec FormulaR1C1. Remplace
FIN.MOIS par EOMONTH et AUjourdhui par Date et les points-virgules par des
virgules. Pas testé, toutefois.
Cordialement.
Daniel
"pierre66" a écrit dans le message de
news:
je cherche à sélectionner sur le mois entier dans des listes

j'essaye avec une base de données en mettant comme critère
ActiveCell.FormulaR1C1 = _
"=""<""FIN.MOIS(AUJOURDHUI();0))"
puis dans un autre )
"="">""FIN.MOIS(AUJOURDHUI();-1)+1)"
pour avoir <dernier_jour_du_mois ET >premier_jour_du_mois

marche pas ...

si quelqu'un a une macro sur l'année, avec une sélection du mois, je
prends !

--
bien cordialement

pierre,
perpignan


Avatar
Elliac
Bonjour,

Avec une base en A1:B16
une zone de critères en H1:H2
en h2 :
=mois(b2)=mois(aujourdhui())

En se positionnant en A1, Données/Filtre/Filtre élaboré :
Copier vers un autre emplacement
- Liste : A1:A16 (automatique normalement)
- Critères : H1:H2
- Copier vers : K1 (par exemple)

Camille


"pierre66" wrote:

je cherche à sélectionner sur le mois entier dans des listes

j'essaye avec une base de données en mettant comme critère
ActiveCell.FormulaR1C1 = _
"=""<""FIN.MOIS(AUJOURDHUI();0))"
puis dans un autre )
"="">""FIN.MOIS(AUJOURDHUI();-1)+1)"
pour avoir <dernier_jour_du_mois ET >premier_jour_du_mois

marche pas ...

si quelqu'un a une macro sur l'année, avec une sélection du mois, je prends !

--
bien cordialement

pierre,
perpignan


Avatar
pierre66
merci pour le tuyau,
mais ça ne marche pas chez moi

FIN.MOIS n'était pas dans les fonctions de base et j'avais ajouté les
"macros complémentaires" (utilitaires d'analyse)

peut-être faut-il télécharger son équivalent en anglais ??
--
cordialement

pierre



Bonjour.
Tu ne peux pas mettre des formules en français avec FormulaR1C1. Remplace
FIN.MOIS par EOMONTH et AUjourdhui par Date et les points-virgules par des
virgules. Pas testé, toutefois.
Cordialement.
Daniel


Avatar
Daniel
Bonsoir.
Je viens de regarder, tes formules engendrent une erreur dans la feuille
Excel.
Essaie tes formules et poste-les en retour (présence du "<" ou du ">")
Cordialement.
Daniel
"pierre66" a écrit dans le message de
news:
merci pour le tuyau,
mais ça ne marche pas chez moi

FIN.MOIS n'était pas dans les fonctions de base et j'avais ajouté les
"macros complémentaires" (utilitaires d'analyse)

peut-être faut-il télécharger son équivalent en anglais ??
--
cordialement

pierre



Bonjour.
Tu ne peux pas mettre des formules en français avec FormulaR1C1. Remplace
FIN.MOIS par EOMONTH et AUjourdhui par Date et les points-virgules par
des
virgules. Pas testé, toutefois.
Cordialement.
Daniel