XL 2016 Premier dimanche de chaque mois en VBA

[dindin]

Bonjour le forum,


voici une formule qui donne le premier dimanche d'un mois quelque soit la date tapée

=SI(JOURSEM(DATE(ANNEE(A6);MOIS(A6);1))=1;DATE(ANNEE(A6);MOIS(A6);1);DATE(ANNEE(A6);MOIS(A6);9-JOURSEM(DATE(ANNEE(A6);MOIS(A6);1))))

Comment faire pour convertir cette formule en VBA
en fait j'aurais besoin d'afficher dans un tableau les dates des premiers dimanches entre mars et décembre en choisissant uniquement l'année dans une liste déroulante.
Merci pour votre aide

 

[Bernard_XLD]

Bonjour dindin, le forum

Vous pouvez utiliser cette fonction personnalisée de patricktoulon
https://www.excel-downloads.com/threads/nieme-day.20056322/

 

[dindin]

Bonjour dindin, le forum

Vous pouvez utiliser cette fonction personnalisée de patricktoulon
https://www.excel-downloads.com/threads/nieme-day.20056322/

Bonjour Yeahou,
Excellente piste, et grand merci à vous deux.

 

[TooFatBoy]

Bonjour,

en fait j'aurais besoin d'afficher dans un tableau les dates des premiers dimanches entre mars et décembre en choisissant uniquement l'année dans une liste déroulante.

Juste par curiosité : pourquoi en VBA vu que tu as une formule qui te donne la réponse ?

 

[dindin]

Bonjour,


Juste par curiosité : pourquoi en VBA vu que tu as une formule qui te donne la réponse ?

Bonjour Marcel32,
car Tout d'abord, je trouve que le VBA est très intéressent, et comme je suis débutant , j'aimerais bien apprendre d'avantage.
en plus cela me permet d'avoir l'information en un seul clic, pour la transmettre au demandeur : exemple :

du coup 2 en 1.
je remercie tout les experts de ce forum pour leur aide très précieuse.