Formule Si index en VBA

Bonjour le forum,

Je voudrais réécrire cette formule pour l'appliquer à la plage C si dans il y a quelque chose dans la ligne correspondant en A :

Cette formule se trouve en C11, et je voudrais pouvoir "l'étirer" en VBA sur toute la colonne C :

=SI(A11="";"";SI($B$10="";"";INDEX(BASEINVENTAIRE;A11;3)))

En vous remerciant par avance

Up

Bonjour quentinmgt, le forum,

Cette formule se trouve en C11, et je voudrais pouvoir "l'étirer" en VBA sur toute la colonne C :

Un essai....

Sub test()
 Dim dl As Long
  dl = Sheets("Ta Feuille").Cells(Rows.Count, A).End(xlUp).Row
  Range("C11:C" & dl).FillDown
End Sub

Cordialement,

Merci Xorsankukai,

Mais j'aimerai écrire cette formule par la VBA et non dans les cellules directement car beaucoup de personnes différentes vont être amenés à utiliser le fichier.

Comment puis-je l'écrire et l'assigner aux cellules de la colonne C ?

Bonjour quentinmgt, le forum,

Un essai....

Sub test()
 Dim dl As Long
  dl = Sheets("Feuil1").Range("A" & Rows.Count).End(xlUp).Row
  Range("C11").FormulaR1C1 = _
        "=IF(R[0]C[-2]="""","""",IF(R10C2="""","""",INDEX(BASEINVENTAIRE,R[0]C[-2],3)))"
  Range("C11:C" & dl).FillDown
End Subb

Cordialement,

Rechercher des sujets similaires à "formule index vba"