Mois.decaler

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.public.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 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.public.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.public.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

Bonjour,

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

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

Cordialement JB

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