VBA : Formule avec variable d'un inputbox

Bonjour,

Dans ma macro Excel, j'ai fait un inputbox , et la variable qu'on tape ( qui est un entier ) je la réutilise ensuite dans une formule dont le résultat est affecté à toutes les cellules sélectionnées...
Le problème est que dans la formule, en passant le curseur sur le nom de ma variable, celle ci n'a pas de valeur, par contre, lors de la déclaration de l'inputbox, la variable dans laquelle je stocke sa valeur, la oui c'est le bon résultat...

Ca doit juste être un problème de syntaxe, mais je n'arrive pas à trouver la bonne.. En fait c'est la première macro que je réalise...

Voici mon code VBA :

Sub macro()
    Dim row As Long
    Dim col As Long
    Dim cel As Range
    Dim Formule As String
    Dim nombre As Variant

    nombre = InputBox("Entrer un entier :")
    row = ActiveCell.row
    col = ActiveCell.Column   

    ligne_deb = Selection.row
    ligne_ = lignedeb + Selection.Rows.Count - 1

    For Each cel In Selection

        Formule = "= SUM(A" & row & ":A" & ligne_ & " )*(SUM(B" & row & ":B" & ligne_ & " ))/nombre "
   
        cel.Value = Formule

        Next cel

End Sub

Merci d'avance pour vos réponses ;)

Tia