Symbole & dans formulalocal

Bonjour,

Je n'arrive pas à intégrer une variable dans une formule que je veux insérer dans plusieurs cellules grâce à une boucle, voici la boucle en question :

Sub test()
For i = 7 To 10000
sheets("Calcul Lead Time").cells(i,18).formulalocal = "=SI(NB.SI(INDIRECT("'Lead Time'!"&B2&"6:"&U2&"6");"*takt*")=0;"";NB.SI(INDIRECT("'Lead Time'!"&B2&"6:"&U2&"6");"*takt*"))" 
next i 'il faudrait remplacer les 6 (il y en a 4) par i, j'ai tenté plusieurs choses sans succès
End Sub

Mon problème vient des "" et des & que je n'arrive pas à gérer lorsque j'essaye de remplacer les 6 par & i & ca ne fonctionne pas

Merci pour votre aide !!

Voilà ce que j'ai tenté

Sub test()
For i = 7 To 10000
sheets("Calcul Lead Time").cells(i,18).formulalocal = "=SI(NB.SI(INDIRECT(""'Lead Time'!""&B2&"" & i & ":""&U2&"" & i & ");""*takt*"")=0;"""";NB.SI(INDIRECT("""'Lead Time'!"&B2&"" & i & ":""&U2&"" & i & "");""*takt*""))" 
next i 'mais cela ne fonctionne toujours pas
End Sub