XL 2016 Syntaxe formule

[KTM]

Bonjour chers tous
j'ai un soucis avec la syntaxe de ma macro
J'ai besoin d'aide. Merci.

Sub Macro3()
With Sheets(1)
.Range("B3:E14") = ""
Dim b As Integer
b = .Range("M1").Value
.Range("B & b:B14").FormulaR1C1 = "=R[-1]C[4]"
End With
End Sub

 

[CHALET53]

peut-être

.Range("B" & b & ":B14").FormulaR1C1 = "=R[-1]C[4]"

 

[KTM]

M

peut-être

.Range("B" & b & ":B14").FormulaR1C1 = "=R[-1]C[4]"

Merci encore