Modifier une formule
viret1290
Messages postés
146
Statut
Membre
-
ccm81 Messages postés 11033 Statut Membre -
ccm81 Messages postés 11033 Statut Membre -
Bonjour,
je désirs inséré cette formule
Cells(2, h).FormulaR1C1 = "=COUNTIF(R6C16:R100C16, ""X"")/2"
avec une variable exemple à la place de R100C16 mettre R30C16
selon la ligne ou je met cette formule
Merci
1 réponse
-
Bonjour
Pas très clair mais un essai
Sub ok() Dim h As Long, li1 As Long, li2 As Long, co As String Dim f As String co = "O" li1 = 6 li2 = 30 h = 3 f = "=NB.SI(" & co & li1 & ":" & co & li2 & ";" & """X""" & ")/2" MsgBox f Cells(2, h).FormulaLocal = f li2 = 100 h = 5 f = "=NB.SI(" & co & li1 & ":" & co & li2 & ";" & """X""" & ")/2" Cells(2, h).FormulaLocal = f End SubSi ça ne correspond pas à ta demande, il faudra en dire un peu plus
Cdlmnt
