Fonction NUM.SEMAINE en macro

lio59 -  
Bonjour,

Je souhaite attribuer à une variable la formule NUM.SEMAINE (formule permettant de calculer le numéro de semaine en norme européenne).
L'enregistrement d'une macro me donne ceci : formule du site

http://excelabo.net/trucs/numero_semaine_norme_europeenne

ActiveCell.FormulaR1C1 = _
"=INT((RC[-1]-(DATE(YEAR(RC[-1]-WEEKDAY(RC[-1]-1)+4),1,3)-WEEKDAY(DATE(YEAR(RC[-1]-WEEKDAY(RC[-1]-1)+4),1,3)))+5)/7)"

Quelle serait la syntaxe pour attribuer cette formule à une variable
dim test as integer
test =_
"INT((A47-(DATE(YEAR(A47-WEEKDAY(A47-1)+4),1,3)-WEEKDAY(DATE(YEAR(A47-WEEKDAY(A47-1)+4),1,3)))+5)/7) 'cela ne fonctionne pas...

Auriez-vous une idée, je sèche depuis longtemps...

Merci à vous!
Configuration: Windows XP
Firefox 2.0.0.20

3 réponses

  1. coco_rico
    bonjour,
    tu peux faire un enregistrement automatique d'une macro, tu devras pouvoir trouver la syntaxe vba.
    0
    1. lio59 Auteur
      Merci de votre réponse.
      La syntaxe donnée dans ma question résulte d'un enregistrement de macro.
      Je ne veux pas que le résultat s'affiche dans une cellule, mais qu'elle soit attribuée à une variable comme, par exemple, NumSem.
      NumSem sera par la suite exploitée dans un calcul. S'affichera au final uniquement le résultat...
      Merci à vous
      0
      1. lio59 Auteur
        en fait c'est
        test = DatePart("ww", [A47], 2, 2)

        Voilà merci à hbhb!
        0