GNT sans publicité, site mobile, fonctionnalitées exclusives...

Mois.decaler

Le
Alain
Je recherche la syntaxe anglaise de la fonction MOIS.DECALER car je
désire inclure celle ci dans le code VBA

ex :
=SI(SI(B3="Mois";MOIS.DECALER(D3;1);SI(B3="Bimestre";MOIS.DECALER(D3;2);SI(B3="Trimestre";MOIS.DECALER(D3;3);SI(B3="Semestre";MOIS.DECALER(D3;6);
SI(B3="An";MOIS.DECALER(D3;12);"")))))>C3;"Fin de
l'opération";SI(B3="Mois";MOIS.DECALER(D3;1);SI(B3="Bimestre";MOIS.DECALER(D3;2);
SI(B3="Trimestre";MOIS.DECALER(D3;3);SI(B3="Semestre";MOIS.DECALER(D3;6);
SI(B3="An";MOIS.DECALER(D3;12);""))))))

Merci
Lire les 4 réponses

Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Modeste
Le #3312401
Bonsour®
Alain wrote:
Je recherche la syntaxe anglaise de la fonction MOIS.DECALER car je
désire inclure celle ci dans le code VBA
:-( cette fonction fait partie d'une macro complémentaire pour lesquelles

souvent il est hasardeux pour des raisons de portabilité
de tenter la traduction.

cela peut etre contourné en utilisant une fonction standard telle que
DATE(ANNEE(D3) ; MOIS(D3)+decalageM ; JOUR(D3))
qui peut etre traduit pour VBA par
DATE(YEAR(D3) , MONTH(D3)+decalageM , DAY(D3))



ex :
=SI(SI(B3="Mois";MOIS.DECALER(D3;1);SI(B3="Bimestre";MOIS.DECALER(D3;2);SI(B3="Trimestre";MOIS.DECALER(D3;3);SI(B3="Semestre";MOIS.DECALER(D3;6);
SI(B3="An";MOIS.DECALER(D3;12);"")))))>C3;"Fin de
l'opération";SI(B3="Mois";MOIS.DECALER(D3;1);SI(B3="Bimestre";MOIS.DECALER(D3;2);
SI(B3="Trimestre";MOIS.DECALER(D3;3);SI(B3="Semestre";MOIS.DECALER(D3;6);
SI(B3="An";MOIS.DECALER(D3;12);""))))))

Merci


--
les news pas à jour ?? ne passez plus par votre FAI, les news à la source
!!!
placez ce raccourci dans la ligne de commande
news://news.microsoft.com/microsoft...c.fr.excel
et répondez OUI

n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr

Modeste
Le #3312371
Modeste wrote:
re-bonsour®
en activant la macro-complémentaire en anglais ATPVBAEN.XLA (Equivalente à
ATPVBAFR.XLA)
sur mon poste elle se trouve là :
C:Program FilesMicrosoft OfficeOffice10MacrolibAnalyse

il est possible d'utiliser la fonction EDATE (datedépart;DécalageMois)
cette fonction est équivalente à MOIS.DECALER

les différentes formulations équivalentes en Local ou US
'=MOIS.DECALER($A$3;B3) 'ÚTE(ANNEE($A$3);MOIS($A$3)+B3;JOUR($A$3))
'íate($A$3;B3)
'=MOIS.DECALER($A$3,B3) 'ÚTE(YEAR($A$3),MONTH($A$3)+B3,DAY($A$3))
'íate($A$3,B3)

@+




--
les news pas à jour ?? ne passez plus par votre FAI, les news à la source
!!!
placez ce raccourci dans la ligne de commande
news://news.microsoft.com/microsoft...c.fr.excel
et répondez OUI

n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr


--
les news pas à jour ?? ne passez plus par votre FAI, les news à la source
!!!
placez ce raccourci dans la ligne de commande
news://news.microsoft.com/microsoft...c.fr.excel
et répondez OUI

n'oubliez pas les FAQ :
http://www.excelabo.net http://dj.joss.free.fr/faq.htm
http://www.faqoe.com http://faqword.free.fr

jb
Le #3312281
Bonjour,

Avec Evaluate (la macro comp 'Utilitaire Analyse' est cochée)

temp = "MOIS.DECALER(""" & [A1] & """,3)"
z = Evaluate(temp)

Cordialement JB
Alain
Le #3310011
Bonjour,

Avec Evaluate (la macro comp 'Utilitaire Analyse' est cochée)

temp = "MOIS.DECALER(""" & [A1] & """,3)"
z = Evaluate(temp)

Cordialement JB



Génial ça marche, merci

Cordialement AR

Publicité
Suivre les réponses
Poster une réponse
Anonyme