Discussion :

[kyros21]

Bonjour à tous,

Alors voilà j'ai du code vba pour inserer une formule qui fonctionne, sauf que celle ci est inserer dans une cellule mais sans le = qui du coup ne calcule pas la formule.

Dès que j'ajoute le =, elle ne fonctionne plus, pourtant je crois bien avoir respecté tous les critères du .formula ...
Voici la formule

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

      Worksheets("Liste Intervenants").Cells(newline, 10).Formula = "IF(COUNTIF(.Range(.Cells(3, 3), .Cells(100, 3)), Worksheets(""Liste Intervenants"").Cells(newline, 2).Value), 1, ""OK"", ""Absente"")"

Impossible d'ajouter le = après le guillemet et avant le I de IF..

Il y a un truc que j'ai mal redigé ???

Merci de votre aide.

[mercatog]

Bonjour

Tu mélange un peu l'écriture

Essaies comme ceci en adaptant Sheet 1 dans la formule

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Worksheets("Liste Intervenants").Cells(NewLine, 10).Formula = "=IF(COUNTIF('Sheet 1'!$C$3:$C$100," & Worksheets("Liste Intervenants").Cells(NewLine, 2).Value & ")=1, ""OK"", ""Absente"")"

[kyros21]

Merci pour votre aide, en effet j'ai mélanger l'écriture excel et VBA...
Ca fonctionne parfaitement, je saurai comment écrire maintenant

Bonne après-midi.