Appliquer formule via VBA

Bonjour

j'ai une formule que je voudrais appliquer a toute une colonne via VBA

Merci.

Bonjour,

à tester,

Range("C3:C11").Formula = "=COUNTIF($B$2:$B2,$B3)+1"

Bonsoir

Merci de votre réponse,

vu que je suis nul en excel comment insérer ce code dans la feuille

Merci

re,

copie cette macro dans le module1

et exécute cette macro

re,

Ce que je souhaite, c'est appliquer cette formule via VBA automatiquement sans bouton.

sur quel action veux-tu que la macro s'exécute ?

au fur et a mesure qu'on saisi sur la colonne B

re,

copie cette macro sur la page code de l'onglet Feuil1

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 And Target.Value <> "" Then
  Range("C" & Target.Row).Formula = "=COUNTIF($B$2:$B" & Target.Row & ",$B" & Target.Row & ")+1"
End If
End Sub

re,

Un petit souci

j'ai repris la formule du fichier transmit

=NB.SI($B$2:$B2;$B3)+1

si ce n'est pas la formule que tu veux utiliser il faut le dire

re,

Oui c'est exacte, mais quand je modifie la saisie des noms en B ça commence a dégringoler

Bob75 a écrit :

Oui c'est exacte, mais quand je modifie la saisie des noms en B ça commence a dégringoler

je ne comprend pas ce que tu veux dire

re,

Mon souhait c'est de numéroter en VBA les doublons, peut être que j'ai mal choisi la formule.

Bob75 a écrit :

re,

Mon souhait c'est de numéroter en VBA les doublons, peut être que j'ai mal choisi la formule.

est ce qu'il ne suffit pas d'enlever le +1 à la fin de la formule ?

Mille merci i20100.