Inserer une formule dans un code VBA

Bonjour à tous,

En K1, j'ai la formule suivante :

=DATEVAL("01/" & O1 & "/" & P1)+(M1*3)

En voulant l'utiliser dans un code VBA, j'ai eu un problème de guillemets dans cette ligne :

nTab = 3
    'Modifier la formule en K1 dans la feuille FP, selon le nombre des tableaux calculés
    With WsFP
        '=DATEVAL("01/" & O1 & "/" & P1)+(M1*3)
        .[K1].Formula = _
        "=DATEVALUE(""01/"" & .[O1] & ""/"" & .[P1] & ")+(" & .[M1] & "*" & nTab & ")"
    End With

Y a-t-il un moyen pour vérifier les guillemets ?

Merci d'avance.

Salut,

essaye ce code :

.Range("K1").Formula = "=DATEVALUE(""01/"" & 'Feuil1'!R1C15 & ""/"" & 'Feuil1'!R1C16)+('Feuil1'!R1C13*" & nTab & ")"

Remplace Feuil1 par le nom de l'onglet correspondant

et pour info, souviens toi que ce que tu écris est une formule (même si c'est écrit en VBA, ça reste une formule) donc .[P1] ne pourra pas fonctionner car c'est une syntaxe appartenant au VBA.

Il faut donc faire référence à ta plage comme cela :

'nom de ta feuille'!R1C1 (R N° de ligne C N° de colonne)

Bonjour Game Over,

Merci la rectification. Ça marche !